/ Archive Magazine CD 1995 / Archive Magazine CD 1995.iso / discs / prog_disc / volume_2 / issue_12 / extras / astronomy / plans

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 15 20 f4 20 20 | 2a 2a 20 20 3e 50 4c 41 |.... .  |**  >PLA|
|00000010| 4e 53 20 2a 2a 0d 00 14 | 06 20 3a 0d 00 1e f2 20 |NS **...|. :.... |
|00000020| f1 27 27 8a 35 29 3b 22 | 54 68 69 73 20 72 6f 75 |.''.5);"|This rou|
|00000030| 74 69 6e 65 20 63 61 6c | 63 75 6c 61 74 65 73 20 |tine cal|culates |
|00000040| 74 68 65 20 69 6e 73 74 | 61 6e 74 61 6e 65 6f 75 |the inst|antaneou|
|00000050| 73 20 68 65 6c 69 6f 63 | 65 6e 74 72 69 63 20 65 |s helioc|entric e|
|00000060| 63 6c 69 70 74 69 63 20 | 20 20 20 20 20 20 20 20 |cliptic |        |
|00000070| 20 20 20 20 20 20 20 20 | 63 6f 6f 72 64 69 6e 61 |        |coordina|
|00000080| 74 65 73 2c 20 72 61 64 | 69 75 73 20 76 65 63 74 |tes, rad|ius vect|
|00000090| 6f 72 20 61 6e 64 20 64 | 69 73 74 61 6e 63 65 20 |or and d|istance |
|000000a0| 66 72 6f 6d 20 74 68 65 | 20 45 61 72 74 68 2c 20 |from the| Earth, |
|000000b0| 61 6e 64 20 61 70 70 61 | 72 65 6e 74 20 20 20 20 |and appa|rent    |
|000000c0| 20 20 20 20 20 20 20 20 | 67 65 6f 63 65 6e 74 72 |        |geocentr|
|000000d0| 69 63 20 65 63 6c 69 70 | 74 69 63 20 63 6f 6f 72 |ic eclip|tic coor|
|000000e0| 64 69 6e 61 74 65 73 20 | 28 61 6c 6c 6f 77 69 6e |dinates |(allowin|
|000000f0| 67 20 66 6f 72 20 6c 69 | 67 68 74 20 74 69 6d 65 |g for li|ght time|
|00000100| 29 2c 20 6f 66 20 6d 61 | 6a 6f 72 22 3b 0d 00 28 |), of ma|jor";..(|
|00000110| 3f 20 f1 8a 35 29 3b 22 | 70 6c 61 6e 65 74 73 20 |? ..5);"|planets |
|00000120| 77 69 74 68 20 72 69 73 | 69 6e 67 20 61 6e 64 20 |with ris|ing and |
|00000130| 73 65 74 74 69 6e 67 20 | 74 69 6d 65 73 20 61 6e |setting |times an|
|00000140| 64 20 61 7a 69 6d 75 74 | 68 73 2e 22 0d 00 32 06 |d azimut|hs."..2.|
|00000150| 20 3a 0d 00 3c 1d 20 dd | a4 44 45 47 28 57 29 3d | :..<. .|.DEG(W)=|
|00000160| 35 2e 37 32 39 35 37 37 | 39 35 31 45 31 2a 57 0d |5.729577|951E1*W.|
|00000170| 00 46 1e 20 dd a4 52 41 | 44 28 57 29 3d 31 2e 37 |.F. ..RA|D(W)=1.7|
|00000180| 34 35 33 32 39 32 35 32 | 45 2d 32 2a 57 0d 00 50 |45329252|E-2*W..P|
|00000190| 23 20 dd a4 41 53 4e 28 | 57 29 3d 99 28 57 2f 28 |# ..ASN(|W)=.(W/(|
|000001a0| b6 28 31 2d 57 2a 57 29 | 2b 31 45 2d 32 30 29 29 |.(1-W*W)|+1E-20))|
|000001b0| 0d 00 5a 1a 20 dd a4 49 | 54 47 28 57 29 3d b4 28 |..Z. ..I|TG(W)=.(|
|000001c0| 57 29 2a a8 28 94 28 57 | 29 29 0d 00 64 1c 20 dd |W)*.(.(W|))..d. .|
|000001d0| a4 55 4e 57 28 58 29 3d | 58 2d a8 28 58 2f 54 50 |.UNW(X)=|X-.(X/TP|
|000001e0| 49 29 2a 54 50 49 0d 00 | 6e 1c 20 dd a4 52 4f 55 |I)*TPI..|n. ..ROU|
|000001f0| 28 58 2c 59 29 3d a8 28 | 58 2a 59 2b 30 2e 35 29 |(X,Y)=.(|X*Y+0.5)|
|00000200| 2f 59 0d 00 78 21 20 dd | a4 41 43 53 28 57 29 3d |/Y..x! .|.ACS(W)=|
|00000210| 31 2e 35 37 30 37 39 36 | 33 32 37 2d a4 41 53 4e |1.570796|327-.ASN|
|00000220| 28 57 29 0d 00 82 1f 20 | de 20 46 4c 41 47 28 39 |(W).... |. FLAG(9|
|00000230| 29 2c 50 4c 41 4e 28 38 | 2c 39 29 2c 4d 41 50 28 |),PLAN(8|,9),MAP(|
|00000240| 38 29 0d 00 8c 39 20 f1 | 3a 54 50 49 3d 32 2a af |8)...9 .|:TPI=2*.|
|00000250| 3a 46 4c 41 47 28 30 29 | 3d 31 3a 44 49 53 3d 31 |:FLAG(0)|=1:DIS=1|
|00000260| 2e 34 35 39 33 45 2d 32 | 3a 4d 56 3d 30 3a 4e 44 |.4593E-2|:MV=0:ND|
|00000270| 24 3d 22 22 3a 4e 50 24 | 3d 22 22 0d 00 96 27 20 |$="":NP$|=""...' |
|00000280| f1 27 27 22 56 69 73 75 | 61 6c 20 61 73 70 65 63 |.''"Visu|al aspec|
|00000290| 74 73 20 6f 66 20 74 68 | 65 20 70 6c 61 6e 65 74 |ts of th|e planet|
|000002a0| 73 22 0d 00 a0 0c 20 f1 | 3a f7 8d 54 76 5a 0d 00 |s".... .|:..TvZ..|
|000002b0| aa 1f 20 e8 22 4e 61 6d | 65 20 6f 66 20 6c 6f 63 |.. ."Nam|e of loc|
|000002c0| 61 74 69 6f 6e 20 22 3b | 43 49 54 59 24 0d 00 b4 |ation ";|CITY$...|
|000002d0| 13 20 e7 43 49 54 59 24 | 3d 22 22 8c 8d 54 6c 41 |. .CITY$|=""..TlA|
|000002e0| 0d 00 be 20 20 f3 4e 41 | 4d 45 24 2c 4c 31 2c 4c |...  .NA|ME$,L1,L|
|000002f0| 32 2c 4c 33 2c 4c 34 2c | 4c 35 2c 4c 36 2c 4c 37 |2,L3,L4,|L5,L6,L7|
|00000300| 0d 00 c8 1f 20 e7 c0 4e | 41 4d 45 24 2c 33 29 3d |.... ..N|AME$,3)=|
|00000310| c0 43 49 54 59 24 2c 33 | 29 20 8c 8d 64 5c 40 0d |.CITY$,3|) ..d\@.|
|00000320| 00 d2 38 20 e7 4e 41 4d | 45 24 3c 3e 22 2a 22 8c |..8 .NAM|E$<>"*".|
|00000330| 8d 74 7e 40 20 8b 20 f1 | 22 43 69 74 79 20 6e 6f |.t~@ . .|"City no|
|00000340| 74 20 66 6f 75 6e 64 22 | 3a 43 49 54 59 24 3d 22 |t found"|:CITY$="|
|00000350| 22 3a e5 8d 54 6c 41 0d | 00 dc 0b 20 f1 4e 41 4d |":..TlA.|... .NAM|
|00000360| 45 24 0d 00 e6 1d 20 58 | 44 3d 4c 31 3a 58 4d 3d |E$.... X|D=L1:XM=|
|00000370| 4c 32 3a 58 53 3d 4c 33 | 3a 53 57 31 3d 2d 31 0d |L2:XS=L3|:SW1=-1.|
|00000380| 00 f0 13 20 f2 4d 69 6e | 73 65 63 3a 4c 4f 4e 47 |... .Min|sec:LONG|
|00000390| 3d 58 0d 00 fa 1d 20 e7 | 4c 31 3e 2d 32 35 20 8c |=X.... .|L1>-25 .|
|000003a0| 20 4b 24 3d 22 2b 22 20 | 8b 20 4b 24 3d 22 22 0d | K$="+" |. K$="".|
|000003b0| 01 04 12 20 e7 4c 31 3d | 30 20 8c 20 4b 24 3d 22 |... .L1=|0 . K$="|
|000003c0| 22 0d 01 0e 16 20 58 44 | 3d 4c 34 3a 58 4d 3d 4c |".... XD|=L4:XM=L|
|000003d0| 35 3a 58 53 3d 4c 36 0d | 01 18 18 20 f2 4d 69 6e |5:XS=L6.|... .Min|
|000003e0| 73 65 63 3a 50 48 49 3d | a4 52 41 44 28 58 29 0d |sec:PHI=|.RAD(X).|
|000003f0| 01 22 0a 20 e5 8d 74 64 | 41 0d 01 2c 2f 20 e8 22 |.". ..td|A..,/ ."|
|00000400| 47 65 6f 67 2e 20 6c 6f | 6e 67 69 74 75 64 65 20 |Geog. lo|ngitude |
|00000410| 28 57 20 6e 65 67 2e 20 | 44 2c 4d 2c 53 29 22 3b |(W neg. |D,M,S)";|
|00000420| 58 44 2c 58 4d 2c 58 53 | 0d 01 36 41 20 e7 20 58 |XD,XM,XS|..6A . X|
|00000430| 44 3e 30 20 8c 20 4c 4f | 24 3d 22 20 20 22 2b c3 |D>0 . LO|$="  "+.|
|00000440| 28 58 4d 29 2b 22 20 6c | 6f 6e 67 2e 45 22 20 8b |(XM)+" l|ong.E" .|
|00000450| 20 4c 4f 24 3d 22 20 20 | 22 2b c3 28 58 4d 29 2b | LO$="  |"+.(XM)+|
|00000460| 22 20 6c 6f 6e 67 2e 57 | 22 0d 01 40 24 20 e7 58 |" long.W|"..@$ .X|
|00000470| 44 3d 30 20 8c 20 4c 4f | 24 3d 22 20 20 22 2b c3 |D=0 . LO|$="  "+.|
|00000480| 28 58 4d 29 2b 22 20 6c | 6f 6e 67 2e 22 0d 01 4a |(XM)+" l|ong."..J|
|00000490| 17 20 4e 41 4d 45 24 3d | c3 28 94 28 58 44 29 29 |. NAME$=|.(.(XD))|
|000004a0| 2b 4c 4f 24 0d 01 54 2b | 20 53 57 31 3d 2d 31 3a |+LO$..T+| SW1=-1:|
|000004b0| f2 4d 69 6e 73 65 63 3a | 4c 4f 4e 47 3d 58 3a 4c |.Minsec:|LONG=X:L|
|000004c0| 37 3d a4 49 54 47 28 4c | 4f 4e 47 2f 31 35 29 0d |7=.ITG(L|ONG/15).|
|000004d0| 01 5e 1d 20 e7 58 44 3e | 2d 32 35 20 8c 20 4b 24 |.^. .XD>|-25 . K$|
|000004e0| 3d 22 2b 22 20 8b 20 4b | 24 3d 22 22 0d 01 68 12 |="+" . K|$=""..h.|
|000004f0| 20 e7 20 58 44 3d 30 20 | 8c 4b 24 3d 22 22 0d 01 | . XD=0 |.K$=""..|
|00000500| 72 2f 20 e8 22 47 65 6f | 67 72 61 70 68 69 63 61 |r/ ."Geo|graphica|
|00000510| 6c 20 6c 61 74 69 74 75 | 64 65 20 20 28 44 2c 4d |l latitu|de  (D,M|
|00000520| 2c 53 29 22 3b 58 44 2c | 58 4d 2c 58 53 0d 01 7c |,S)";XD,|XM,XS..||
|00000530| 3e 20 e7 58 44 3e 30 20 | 8c 20 4c 41 24 3d 22 20 |> .XD>0 |. LA$=" |
|00000540| 20 22 2b c3 28 58 4d 29 | 2b 22 20 6c 61 74 2e 4e | "+.(XM)|+" lat.N|
|00000550| 22 20 8b 20 4c 41 24 3d | 22 20 20 22 2b c3 28 58 |" . LA$=|"  "+.(X|
|00000560| 4d 29 2b 22 20 6c 61 74 | 2e 53 22 0d 01 86 23 20 |M)+" lat|.S"...# |
|00000570| e7 58 44 3d 30 20 8c 20 | 4c 41 24 3d 22 20 20 22 |.XD=0 . |LA$="  "|
|00000580| 2b c3 28 58 4d 29 2b 22 | 20 6c 61 74 2e 22 0d 01 |+.(XM)+"| lat."..|
|00000590| 90 23 20 4e 41 4d 45 24 | 3d 4e 41 4d 45 24 2b 22 |.# NAME$|=NAME$+"|
|000005a0| 20 20 20 22 2b c3 28 94 | 28 58 44 29 29 2b 4c 41 |   "+.(.|(XD))+LA|
|000005b0| 24 0d 01 9a 18 20 f2 4d | 69 6e 73 65 63 3a 50 48 |$.... .M|insec:PH|
|000005c0| 49 3d a4 52 41 44 28 58 | 29 0d 01 a4 0a 20 f7 8d |I=.RAD(X|).... ..|
|000005d0| 54 76 5a 0d 01 ae 2a 20 | e7 20 28 4e 44 24 3d 22 |TvZ...* |. (ND$="|
|000005e0| 4e 22 20 80 20 4e 50 24 | 3d 22 4e 22 29 20 84 20 |N" . NP$|="N") . |
|000005f0| 4e 44 24 3d 22 4e 22 20 | 8c 8d 64 7e 41 0d 01 b8 |ND$="N" |..d~A...|
|00000600| 1e 20 e7 20 4e 44 24 3d | 22 4e 22 20 80 20 4e 50 |. . ND$=|"N" . NP|
|00000610| 24 3d 22 59 22 20 8c 8d | 54 48 42 0d 01 c2 06 20 |$="Y" ..|THB.... |
|00000620| 3a 0d 01 cc 1e 20 e8 22 | 44 61 74 65 20 20 28 44 |:.... ."|Date  (D|
|00000630| 2c 4d 2c 59 29 22 3b 44 | 59 2c 4d 4e 2c 59 52 0d |,M,Y)";D|Y,MN,YR.|
|00000640| 01 d6 26 20 e8 22 20 20 | 2e 2e 2e 61 6e 64 20 74 |..& ."  |...and t|
|00000650| 69 6d 65 20 28 48 2c 4d | 2c 53 29 22 3b 58 44 2c |ime (H,M|,S)";XD,|
|00000660| 58 4d 2c 58 53 0d 01 e0 | 16 20 58 30 3d 58 44 3a |XM,XS...|. X0=XD:|
|00000670| 4d 30 3d 58 4d 3a 53 30 | 3d 58 53 0d 01 ea 19 20 |M0=XM:S0|=XS.... |
|00000680| 53 57 31 3d 2d 31 3a f2 | 4d 69 6e 73 65 63 3a 54 |SW1=-1:.|Minsec:T|
|00000690| 49 4d 3d 58 0d 01 f4 19 | 20 53 57 32 3d 31 3a f2 |IM=X....| SW2=1:.|
|000006a0| 47 74 69 6d 65 3a 47 53 | 54 3d 47 54 4d 0d 01 fe |Gtime:GS|T=GTM...|
|000006b0| 15 20 f1 3a e7 20 4e 50 | 24 3d 22 4e 22 8c 8d 54 |. .:. NP|$="N"..T|
|000006c0| 52 42 0d 02 08 17 20 e8 | 22 57 68 69 63 68 20 70 |RB.... .|"Which p|
|000006d0| 6c 61 6e 65 74 22 3b 50 | 24 0d 02 12 1b 20 f1 3a |lanet";P|$.... .:|
|000006e0| f1 3a 46 4c 41 47 28 29 | 3d 30 3a 46 4c 41 47 28 |.:FLAG()|=0:FLAG(|
|000006f0| 30 29 3d 31 0d 02 1c 0b | 20 f2 50 6c 61 6e 73 0d |0)=1....| .Plans.|
|00000700| 02 26 20 20 e7 20 49 50 | 3d 31 20 84 20 49 50 3d |.&  . IP|=1 . IP=|
|00000710| 32 20 8c 20 4d 56 3d 31 | 3a f2 53 75 6e 72 73 0d |2 . MV=1|:.Sunrs.|
|00000720| 02 30 12 20 e7 20 49 50 | 3d 30 20 8c 20 8d 74 64 |.0. . IP|=0 . .td|
|00000730| 41 0d 02 3a 5f 20 f1 27 | 50 24 3b 22 20 22 3b 44 |A..:_ .'|P$;" ";D|
|00000740| 59 3b 22 2e 22 3b 4d 4e | 3b 22 2e 22 3b 59 52 3b |Y;".";MN|;".";YR;|
|00000750| 22 20 61 74 20 22 3b 58 | 30 3b 22 20 22 3b 4d 30 |" at ";X|0;" ";M0|
|00000760| 3b 22 20 22 3b 53 30 3b | 22 68 72 73 20 47 4d 54 |;" ";S0;|"hrs GMT|
|00000770| 20 66 72 6f 6d 20 22 3b | 4e 41 4d 45 24 3b 22 20 | from ";|NAME$;" |
|00000780| 28 47 4d 54 20 22 3b 4b | 24 3b 4c 37 3b 22 29 22 |(GMT ";K|$;L7;")"|
|00000790| 0d 02 44 21 20 f1 22 48 | 65 6c 69 6f 63 65 6e 74 |..D! ."H|eliocent|
|000007a0| 72 69 63 20 63 6f 6f 72 | 64 69 6e 61 74 65 73 3a |ric coor|dinates:|
|000007b0| 22 0d 02 4e 06 20 f1 0d | 02 58 1f 20 53 57 31 3d |"..N. ..|.X. SW1=|
|000007c0| 31 3a 58 3d a4 44 45 47 | 28 4c 50 44 30 29 3a f2 |1:X=.DEG|(LPD0):.|
|000007d0| 4d 69 6e 73 65 63 0d 02 | 62 38 20 f1 8a 31 30 29 |Minsec..|b8 ..10)|
|000007e0| 3b 22 6c 6f 6e 67 69 74 | 75 64 65 20 28 44 2c 4d |;"longit|ude (D,M|
|000007f0| 2c 53 29 3a 22 3b 8a 34 | 30 29 3b 53 24 3b 58 44 |,S):";.4|0);S$;XD|
|00000800| 3b 22 20 22 3b 58 4d 3b | 22 20 22 3b 58 53 0d 02 |;" ";XM;|" ";XS..|
|00000810| 6c 19 20 58 3d a4 44 45 | 47 28 50 53 49 30 29 3a |l. X=.DE|G(PSI0):|
|00000820| f2 4d 69 6e 73 65 63 0d | 02 76 38 20 f1 8a 31 30 |.Minsec.|.v8 ..10|
|00000830| 29 3b 22 6c 61 74 69 74 | 75 64 65 20 20 28 44 2c |);"latit|ude  (D,|
|00000840| 4d 2c 53 29 3a 22 3b 8a | 34 30 29 3b 53 24 3b 58 |M,S):";.|40);S$;X|
|00000850| 44 3b 22 20 22 3b 58 4d | 3b 22 20 22 3b 58 53 0d |D;" ";XM|;" ";XS.|
|00000860| 02 80 32 20 f1 8a 31 30 | 29 3b 22 72 61 64 69 75 |..2 ..10|);"radiu|
|00000870| 73 20 76 65 63 74 6f 72 | 28 41 55 29 3a 22 3b 8a |s vector|(AU):";.|
|00000880| 34 30 29 3b a4 52 4f 55 | 28 52 50 30 2c 31 45 36 |40);.ROU|(RP0,1E6|
|00000890| 29 0d 02 8a 06 20 f1 0d | 02 94 1f 20 f1 22 47 65 |).... ..|... ."Ge|
|000008a0| 6f 63 65 6e 74 72 69 63 | 20 63 6f 6f 72 64 69 6e |ocentric| coordin|
|000008b0| 61 74 65 73 3a 22 0d 02 | 9e 06 20 f1 0d 02 a8 18 |ates:"..|.. .....|
|000008c0| 20 58 3d a4 44 45 47 28 | 4c 41 4d 29 3a f2 4d 69 | X=.DEG(|LAM):.Mi|
|000008d0| 6e 73 65 63 0d 02 b2 38 | 20 f1 8a 31 30 29 3b 22 |nsec...8| ..10);"|
|000008e0| 6c 6f 6e 67 69 74 75 64 | 65 20 28 44 2c 4d 2c 53 |longitud|e (D,M,S|
|000008f0| 29 3a 22 3b 8a 34 30 29 | 3b 53 24 3b 58 44 3b 22 |):";.40)|;S$;XD;"|
|00000900| 20 22 3b 58 4d 3b 22 20 | 22 3b 58 53 0d 02 bc 18 | ";XM;" |";XS....|
|00000910| 20 58 3d a4 44 45 47 28 | 42 45 54 29 3a f2 4d 69 | X=.DEG(|BET):.Mi|
|00000920| 6e 73 65 63 0d 02 c6 38 | 20 f1 8a 31 30 29 3b 22 |nsec...8| ..10);"|
|00000930| 6c 61 74 69 74 75 64 65 | 20 20 28 44 2c 4d 2c 53 |latitude|  (D,M,S|
|00000940| 29 3a 22 3b 8a 34 30 29 | 3b 53 24 3b 58 44 3b 22 |):";.40)|;S$;XD;"|
|00000950| 20 22 3b 58 4d 3b 22 20 | 22 3b 58 53 0d 02 d0 3a | ";XM;" |";XS...:|
|00000960| 20 f1 8a 31 30 29 3b 22 | 64 69 73 74 61 6e 63 65 | ..10);"|distance|
|00000970| 20 66 72 6f 6d 20 45 61 | 72 74 68 20 28 41 55 29 | from Ea|rth (AU)|
|00000980| 3a 22 3b 8a 34 30 29 3b | a4 52 4f 55 28 52 48 4f |:";.40);|.ROU(RHO|
|00000990| 30 2c 31 45 36 29 0d 02 | da 1e 20 f2 4e 75 74 61 |0,1E6)..|.. .Nuta|
|000009a0| 74 3a 4c 41 4d 3d 4c 41 | 4d 2b a4 52 41 44 28 44 |t:LAM=LA|M+.RAD(D|
|000009b0| 50 53 49 29 0d 02 e4 1f | 20 41 3d 4c 47 2b af 2d |PSI)....| A=LG+.-|
|000009c0| 4c 41 4d 3a 43 41 3d 9b | 28 41 29 3a 53 41 3d b5 |LAM:CA=.|(A):SA=.|
|000009d0| 28 41 29 0d 02 ee 22 20 | 4c 41 4d 3d 4c 41 4d 2d |(A)..." |LAM=LAM-|
|000009e0| 28 39 2e 39 33 38 37 45 | 2d 35 2a 43 41 2f 9b 28 |(9.9387E|-5*CA/.(|
|000009f0| 42 45 54 29 29 0d 02 f8 | 22 20 42 45 54 3d 42 45 |BET))...|" BET=BE|
|00000a00| 54 2d 28 39 2e 39 33 38 | 37 45 2d 35 2a 53 41 2a |T-(9.938|7E-5*SA*|
|00000a10| b5 28 42 45 54 29 29 0d | 03 02 1e 20 58 3d 4c 41 |.(BET)).|... X=LA|
|00000a20| 4d 3a 59 3d 42 45 54 3a | 53 57 33 3d 2d 31 3a f2 |M:Y=BET:|SW3=-1:.|
|00000a30| 45 71 65 63 6c 0d 03 0c | 23 20 50 58 3d 50 3a 51 |Eqecl...|# PX=P:Q|
|00000a40| 58 3d 51 3a 58 3d a4 44 | 45 47 28 50 2f 31 35 29 |X=Q:X=.D|EG(P/15)|
|00000a50| 3a f2 4d 69 6e 73 65 63 | 0d 03 16 3f 20 f1 8a 31 |:.Minsec|...? ..1|
|00000a60| 30 29 3b 22 72 69 67 68 | 74 20 61 73 63 65 6e 73 |0);"righ|t ascens|
|00000a70| 69 6f 6e 20 20 28 48 2c | 4d 2c 53 29 3a 22 3b 8a |ion  (H,|M,S):";.|
|00000a80| 34 30 29 3b 53 24 3b 58 | 44 3b 22 20 22 3b 58 4d |40);S$;X|D;" ";XM|
|00000a90| 3b 22 20 22 3b 58 53 0d | 03 20 16 20 58 3d a4 44 |;" ";XS.|. . X=.D|
|00000aa0| 45 47 28 51 29 3a f2 4d | 69 6e 73 65 63 0d 03 2a |EG(Q):.M|insec..*|
|00000ab0| 3f 20 f1 8a 31 30 29 3b | 22 64 65 63 6c 69 6e 61 |? ..10);|"declina|
|00000ac0| 74 69 6f 6e 20 20 20 20 | 20 20 28 44 2c 4d 2c 53 |tion    |  (D,M,S|
|00000ad0| 29 3a 22 3b 8a 34 30 29 | 3b 53 24 3b 58 44 3b 22 |):";.40)|;S$;XD;"|
|00000ae0| 20 22 3b 58 4d 3b 22 20 | 22 3b 58 53 0d 03 34 25 | ";XM;" |";XS..4%|
|00000af0| 20 43 45 4c 3d 2d 31 2a | 43 59 2a 9b 28 4c 41 4d | CEL=-1*|CY*.(LAM|
|00000b00| 2d 4c 47 29 3a 45 4c 3d | a4 41 43 53 28 43 45 4c |-LG):EL=|.ACS(CEL|
|00000b10| 29 0d 03 3e 12 20 45 4c | 3d a4 44 45 47 28 45 4c |)..>. EL|=.DEG(EL|
|00000b20| 29 3a f1 0d 03 48 36 20 | f1 8a 31 30 29 3b 22 73 |):...H6 |..10);"s|
|00000b30| 6f 6c 61 72 20 65 6c 6f | 6e 67 61 74 69 6f 6e 20 |olar elo|ngation |
|00000b40| 28 64 65 67 29 3a 22 3b | 8a 34 30 29 3b a4 52 4f |(deg):";|.40);.RO|
|00000b50| 55 28 45 4c 2c 31 30 30 | 29 0d 03 52 40 20 f1 8a |U(EL,100|)..R@ ..|
|00000b60| 31 30 29 3b 22 41 6e 67 | 75 6c 61 72 20 73 69 7a |10);"Ang|ular siz|
|00000b70| 65 20 28 61 72 63 73 65 | 63 29 3a 22 3b 8a 34 30 |e (arcse|c):";.40|
|00000b80| 29 3b a4 52 4f 55 28 50 | 4c 41 4e 28 49 50 2c 38 |);.ROU(P|LAN(IP,8|
|00000b90| 29 2f 52 48 4f 2c 31 30 | 29 0d 03 5c 19 20 46 3d |)/RHO,10|)..\. F=|
|00000ba0| 30 2e 35 2a 28 31 2b 9b | 28 4c 41 4d 2d 4c 50 44 |0.5*(1+.|(LAM-LPD|
|00000bb0| 29 29 0d 03 66 2d 20 f1 | 8a 31 30 29 3b 22 50 68 |))..f- .|.10);"Ph|
|00000bc0| 61 73 65 20 28 31 3d 66 | 75 6c 6c 29 3a 22 3b 8a |ase (1=f|ull):";.|
|00000bd0| 34 30 29 3b a4 52 4f 55 | 28 46 2c 31 30 30 29 0d |40);.ROU|(F,100).|
|00000be0| 03 70 15 20 58 3d ab 28 | 52 50 2a 52 48 4f 2f b6 |.p. X=.(|RP*RHO/.|
|00000bf0| 28 46 29 29 0d 03 7a 1d | 20 4d 41 47 3d 35 2a 58 |(F))..z.| MAG=5*X|
|00000c00| 2f ab 28 31 30 29 2b 50 | 4c 41 4e 28 49 50 2c 39 |/.(10)+P|LAN(IP,9|
|00000c10| 29 0d 03 84 35 20 f1 8a | 31 30 29 3b 22 41 70 70 |)...5 ..|10);"App|
|00000c20| 72 6f 78 69 6d 61 74 65 | 20 6d 61 67 6e 69 74 75 |roximate| magnitu|
|00000c30| 64 65 3a 22 3b 8a 34 30 | 29 3b a4 52 4f 55 28 4d |de:";.40|);.ROU(M|
|00000c40| 41 47 2c 31 30 29 0d 03 | 8e 19 20 58 3d a4 44 45 |AG,10)..|.. X=.DE|
|00000c50| 47 28 50 58 2f 31 35 29 | 3a f2 48 72 61 6e 67 0d |G(PX/15)|:.Hrang.|
|00000c60| 03 98 1d 20 58 3d a4 52 | 41 44 28 50 29 2a 31 35 |... X=.R|AD(P)*15|
|00000c70| 3a 59 3d 51 58 3a f2 45 | 71 68 6f 72 0d 03 a2 2b |:Y=QX:.E|qhor...+|
|00000c80| 20 58 3d a4 44 45 47 28 | 50 29 3a 51 3d a4 44 45 | X=.DEG(|P):Q=.DE|
|00000c90| 47 28 51 29 3a 58 41 3d | 58 3a 53 57 31 3d 31 3a |G(Q):XA=|X:SW1=1:|
|00000ca0| f2 4d 69 6e 73 65 63 0d | 03 ac 3a 20 f1 8a 31 30 |.Minsec.|..: ..10|
|00000cb0| 29 3b 22 61 7a 69 6d 75 | 74 68 20 20 20 20 20 28 |);"azimu|th     (|
|00000cc0| 44 2c 4d 2c 53 29 3a 22 | 3b 8a 34 30 29 3b 53 24 |D,M,S):"|;.40);S$|
|00000cd0| 3b 58 44 3b 22 20 22 3b | 58 4d 3b 22 20 22 3b 58 |;XD;" ";|XM;" ";X|
|00000ce0| 53 0d 03 b6 10 20 58 3d | 51 3a f2 4d 69 6e 73 65 |S.... X=|Q:.Minse|
|00000cf0| 63 0d 03 c0 3a 20 f1 8a | 31 30 29 3b 22 61 6c 74 |c...: ..|10);"alt|
|00000d00| 69 74 75 64 65 20 20 20 | 20 28 44 2c 4d 2c 53 29 |itude   | (D,M,S)|
|00000d10| 3a 22 3b 8a 34 30 29 3b | 53 24 3b 58 44 3b 22 20 |:";.40);|S$;XD;" |
|00000d20| 22 3b 58 4d 3b 22 20 22 | 3b 58 53 0d 03 ca 17 20 |";XM;" "|;XS.... |
|00000d30| 58 3d a4 44 45 47 28 50 | 58 2f 31 35 29 3a 59 3d |X=.DEG(P|X/15):Y=|
|00000d40| 51 58 0d 03 d4 0b 20 f2 | 52 69 73 65 74 0d 03 de |QX.... .|Riset...|
|00000d50| 15 20 e7 20 45 52 52 31 | 20 3c 3e 30 20 8c 8d 64 |. . ERR1| <>0 ..d|
|00000d60| 7c 43 0d 03 e8 06 20 f1 | 0d 03 f2 19 20 58 3d 4c ||C.... .|.... X=L|
|00000d70| 53 54 52 3a 53 57 31 3d | 31 3a f2 4d 69 6e 73 65 |STR:SW1=|1:.Minse|
|00000d80| 63 0d 03 fc 2e 20 f1 8a | 31 30 29 3b 22 4c 53 54 |c.... ..|10);"LST|
|00000d90| 20 72 69 73 65 3a 20 22 | 3b 8a 34 30 29 3b 20 58 | rise: "|;.40); X|
|00000da0| 44 3b 22 3a 22 3b 58 4d | 3b 22 3a 22 3b 58 53 0d |D;":";XM|;":";XS.|
|00000db0| 04 06 13 20 58 3d 4c 53 | 54 53 3a f2 4d 69 6e 73 |... X=LS|TS:.Mins|
|00000dc0| 65 63 0d 04 10 2e 20 f1 | 8a 31 30 29 3b 22 4c 53 |ec.... .|.10);"LS|
|00000dd0| 54 20 73 65 74 20 3a 20 | 22 3b 8a 34 30 29 3b 20 |T set : |";.40); |
|00000de0| 58 44 3b 22 3a 22 3b 58 | 4d 3b 22 3a 22 3b 58 53 |XD;":";X|M;":";XS|
|00000df0| 0d 04 1a 23 20 54 49 4d | 3d 4c 53 54 52 2d 4c 4f |...# TIM|=LSTR-LO|
|00000e00| 4e 47 2f 31 35 3a 53 57 | 32 3d 2d 31 3a f2 47 74 |NG/15:SW|2=-1:.Gt|
|00000e10| 69 6d 65 0d 04 24 2f 20 | f1 8a 31 30 29 3b 22 47 |ime..$/ |..10);"G|
|00000e20| 4d 54 20 72 69 73 65 3a | 20 22 3b 8a 34 30 29 3b |MT rise:| ";.40);|
|00000e30| 20 48 53 3b 22 3a 22 3b | 4d 53 3b 22 3a 22 3b 53 | HS;":";|MS;":";S|
|00000e40| 53 3b 0d 04 2e 3e 20 e7 | 20 4d 56 3d 31 20 f1 8a |S;...> .| MV=1 ..|
|00000e50| 35 38 29 3b 22 53 75 6e | 72 69 73 65 20 3a 20 22 |58);"Sun|rise : "|
|00000e60| 3b 8a 36 38 29 3b 20 48 | 53 52 3b 22 3a 22 3b 4d |;.68); H|SR;":";M|
|00000e70| 53 52 3b 22 3a 22 3b 53 | 53 52 3a e5 8d 44 42 44 |SR;":";S|SR:..DBD|
|00000e80| 0d 04 38 06 20 f1 0d 04 | 42 1c 20 54 49 4d 3d 4c |..8. ...|B. TIM=L|
|00000e90| 53 54 53 2d 4c 4f 4e 47 | 2f 31 35 3a f2 47 74 69 |STS-LONG|/15:.Gti|
|00000ea0| 6d 65 0d 04 4c 2f 20 f1 | 8a 31 30 29 3b 22 47 4d |me..L/ .|.10);"GM|
|00000eb0| 54 20 73 65 74 20 3a 20 | 22 3b 8a 34 30 29 3b 20 |T set : |";.40); |
|00000ec0| 48 53 3b 22 3a 22 3b 4d | 53 3b 22 3a 22 3b 53 53 |HS;":";M|S;":";SS|
|00000ed0| 3b 0d 04 56 3e 20 e7 20 | 4d 56 3d 31 20 f1 8a 35 |;..V> . |MV=1 ..5|
|00000ee0| 38 29 3b 22 53 75 6e 73 | 65 74 20 20 3a 20 22 3b |8);"Suns|et  : ";|
|00000ef0| 8a 36 38 29 3b 20 48 53 | 53 3b 22 3a 22 3b 4d 53 |.68); HS|S;":";MS|
|00000f00| 53 3b 22 3a 22 3b 53 53 | 53 3a e5 8d 44 6a 44 0d |S;":";SS|S:..DjD.|
|00000f10| 04 60 06 20 f1 0d 04 6a | 18 20 58 3d a4 44 45 47 |.`. ...j|. X=.DEG|
|00000f20| 28 41 5a 52 29 3a f2 4d | 69 6e 73 65 63 0d 04 74 |(AZR):.M|insec..t|
|00000f30| 3b 20 f1 8a 31 30 29 3b | 22 41 7a 69 6d 75 74 68 |; ..10);|"Azimuth|
|00000f40| 20 72 69 73 65 3a 28 44 | 2c 4d 2c 53 29 3a 22 3b | rise:(D|,M,S):";|
|00000f50| 8a 34 30 29 3b 53 24 3b | 58 44 3b 22 20 22 3b 58 |.40);S$;|XD;" ";X|
|00000f60| 4d 3b 22 20 22 3b 58 53 | 0d 04 7e 18 20 58 3d a4 |M;" ";XS|..~. X=.|
|00000f70| 44 45 47 28 41 5a 53 29 | 3a f2 4d 69 6e 73 65 63 |DEG(AZS)|:.Minsec|
|00000f80| 0d 04 88 3b 20 f1 8a 31 | 30 29 3b 22 41 7a 69 6d |...; ..1|0);"Azim|
|00000f90| 75 74 68 20 73 65 74 20 | 3a 28 44 2c 4d 2c 53 29 |uth set |:(D,M,S)|
|00000fa0| 3a 22 3b 8a 34 30 29 3b | 53 24 3b 58 44 3b 22 20 |:";.40);|S$;XD;" |
|00000fb0| 22 3b 58 4d 3b 22 20 22 | 3b 58 53 0d 04 92 24 20 |";XM;" "|;XS...$ |
|00000fc0| f1 3a f7 8d 54 76 5a 3a | e3 4a 3d 31 b8 39 3a 46 |.:..TvZ:|.J=1.9:F|
|00000fd0| 4c 41 47 28 4a 29 3d 30 | 3a ed 3a 4d 56 3d 30 0d |LAG(J)=0|:.:MV=0.|
|00000fe0| 04 9c 17 20 e8 22 41 67 | 61 69 6e 20 28 59 2f 4e |... ."Ag|ain (Y/N|
|00000ff0| 29 22 3b 41 4e 24 0d 04 | a6 10 20 e7 20 41 4e 24 |)";AN$..|.. . AN$|
|00001000| 3d 22 4e 22 20 e0 0d 04 | b0 1e 20 e8 22 4e 65 77 |="N" ...|.. ."New|
|00001010| 20 6c 6f 63 61 74 69 6f | 6e 20 28 59 2f 4e 29 22 | locatio|n (Y/N)"|
|00001020| 3b 4e 4c 24 0d 04 ba 1a | 20 e8 22 4e 65 77 20 64 |;NL$....| ."New d|
|00001030| 61 74 65 20 28 59 2f 4e | 29 22 3b 4e 44 24 0d 04 |ate (Y/N|)";ND$..|
|00001040| c4 1c 20 e8 22 4e 65 77 | 20 70 6c 61 6e 65 74 20 |.. ."New| planet |
|00001050| 28 59 2f 4e 29 22 3b 4e | 50 24 0d 04 ce 29 20 e7 |(Y/N)";N|P$...) .|
|00001060| 28 4e 4c 24 3d 22 59 22 | 20 80 20 4e 44 24 3d 22 |(NL$="Y"| . ND$="|
|00001070| 59 22 29 20 84 20 4e 4c | 24 3d 22 59 22 20 8c 8d |Y") . NL|$="Y" ..|
|00001080| 74 60 40 0d 04 d8 0a 20 | e5 8d 74 64 41 0d 04 e2 |t`@.... |..tdA...|
|00001090| 06 20 3a 0d 04 ec 0d 20 | dd f2 4d 69 6e 73 65 63 |. :.... |..Minsec|
|000010a0| 0d 04 f6 1d 20 e7 20 53 | 57 31 3d 31 20 f2 4d 69 |.... . S|W1=1 .Mi|
|000010b0| 6e 73 65 63 5f 49 6e 74 | 65 67 65 72 73 0d 05 00 |nsec_Int|egers...|
|000010c0| 1d 20 e7 20 53 57 31 3d | 2d 31 20 f2 4d 69 6e 73 |. . SW1=|-1 .Mins|
|000010d0| 65 63 5f 44 65 63 69 6d | 61 6c 0d 05 0a 06 20 e1 |ec_Decim|al.... .|
|000010e0| 0d 05 14 06 20 3a 0d 05 | 1e 16 20 dd f2 4d 69 6e |.... :..|.. ..Min|
|000010f0| 73 65 63 5f 49 6e 74 65 | 67 65 72 73 0d 05 28 1d |sec_Inte|gers..(.|
|00001100| 20 53 4e 3d b4 28 58 29 | 3a 58 50 3d 94 28 58 29 | SN=.(X)|:XP=.(X)|
|00001110| 3a 58 44 3d a8 28 58 50 | 29 0d 05 32 19 20 41 3d |:XD=.(XP|)..2. A=|
|00001120| 28 58 50 2d 58 44 29 2a | 36 30 3a 58 4d 3d a8 28 |(XP-XD)*|60:XM=.(|
|00001130| 41 29 0d 05 3c 1c 20 58 | 53 3d a8 28 28 41 2d 58 |A)..<. X|S=.((A-X|
|00001140| 4d 29 2a 36 30 30 2b 30 | 2e 35 29 2f 31 30 0d 05 |M)*600+0|.5)/10..|
|00001150| 46 0b 20 53 24 3d 22 2b | 22 0d 05 50 16 20 e7 20 |F. S$="+|"..P. . |
|00001160| 53 4e 3d 2d 31 20 20 8c | 20 53 24 3d 22 2d 22 0d |SN=-1  .| S$="-".|
|00001170| 05 5a 06 20 e1 0d 05 64 | 06 20 3a 0d 05 6e 15 20 |.Z. ...d|. :..n. |
|00001180| dd f2 4d 69 6e 73 65 63 | 5f 44 65 63 69 6d 61 6c |..Minsec|_Decimal|
|00001190| 0d 05 78 0a 20 53 4e 3d | 2b 31 0d 05 82 21 20 e7 |..x. SN=|+1...! .|
|000011a0| 20 58 44 3c 30 20 84 20 | 58 4d 3c 30 20 84 20 58 | XD<0 . |XM<0 . X|
|000011b0| 53 3c 30 20 8c 20 53 4e | 3d 2d 31 0d 05 8c 22 20 |S<0 . SN|=-1..." |
|000011c0| 58 44 31 3d 94 28 58 44 | 29 3a 58 4d 31 3d 94 28 |XD1=.(XD|):XM1=.(|
|000011d0| 58 4d 29 3a 58 53 31 3d | 94 28 58 53 29 0d 05 96 |XM):XS1=|.(XS)...|
|000011e0| 23 20 58 3d 28 28 28 28 | 58 53 31 2f 36 30 29 2b |# X=((((|XS1/60)+|
|000011f0| 58 4d 31 29 2f 36 30 29 | 2b 58 44 31 29 2a 53 4e |XM1)/60)|+XD1)*SN|
|00001200| 0d 05 a0 06 20 e1 0d 05 | aa 06 20 3a 0d 05 b4 0d |.... ...|.. :....|
|00001210| 20 dd f2 4a 75 6c 64 61 | 79 0d 05 be 12 20 e7 20 | ..Julda|y.... . |
|00001220| 46 4c 41 47 28 31 29 3d | 31 20 e1 0d 05 c8 20 20 |FLAG(1)=|1 ....  |
|00001230| 4d 4e 31 3d 4d 4e 3a 59 | 52 31 3d 59 52 3a 46 4c |MN1=MN:Y|R1=YR:FL|
|00001240| 41 47 28 31 29 3d 31 3a | 42 3d 30 0d 05 d2 15 20 |AG(1)=1:|B=0.... |
|00001250| e7 20 59 52 31 3c 30 20 | 8c 20 59 52 31 2b 3d 31 |. YR1<0 |. YR1+=1|
|00001260| 0d 05 dc 1c 20 e7 20 4d | 4e 3c 33 20 8c 20 4d 4e |.... . M|N<3 . MN|
|00001270| 31 2b 3d 31 32 3a 59 52 | 31 2d 3d 31 0d 05 e6 15 |1+=12:YR|1-=1....|
|00001280| 20 e7 20 59 52 3c 31 35 | 38 32 20 8c 20 8d 54 4e | . YR<15|82 . .TN|
|00001290| 46 0d 05 f0 1d 20 e7 20 | 59 52 3d 31 35 38 32 20 |F.... . |YR=1582 |
|000012a0| 80 20 4d 4e 3c 31 30 20 | 8c 20 8d 54 4e 46 0d 05 |. MN<10 |. .TNF..|
|000012b0| fa 25 20 e7 20 59 52 3d | 31 35 38 32 20 80 20 4d |.% . YR=|1582 . M|
|000012c0| 4e 3d 31 30 20 80 20 44 | 59 3c 31 35 20 8c 20 8d |N=10 . D|Y<15 . .|
|000012d0| 54 4e 46 0d 06 04 1e 20 | 41 3d a8 28 59 52 31 2f |TNF.... |A=.(YR1/|
|000012e0| 31 30 30 29 3a 42 3d 32 | 2d 41 2b a8 28 41 2f 34 |100):B=2|-A+.(A/4|
|000012f0| 29 0d 06 0e 13 20 e7 20 | 59 52 31 3c 30 20 8c 20 |).... . |YR1<0 . |
|00001300| 8d 54 62 46 0d 06 18 22 | 20 43 3d a8 28 33 36 35 |.TbF..."| C=.(365|
|00001310| 2e 32 35 2a 59 52 31 29 | 2d 36 39 34 30 32 35 3a |.25*YR1)|-694025:|
|00001320| e5 20 8d 54 6c 46 0d 06 | 22 25 20 43 3d a4 49 54 |. .TlF..|"% C=.IT|
|00001330| 47 28 28 33 36 35 2e 32 | 35 2a 59 52 31 29 2d 30 |G((365.2|5*YR1)-0|
|00001340| 2e 37 35 29 2d 36 39 34 | 30 32 35 0d 06 2c 19 20 |.75)-694|025..,. |
|00001350| 44 3d a8 28 33 30 2e 36 | 30 30 31 2a 28 4d 4e 31 |D=.(30.6|001*(MN1|
|00001360| 2b 31 29 29 0d 06 36 15 | 20 44 4a 44 3d 42 2b 43 |+1))..6.| DJD=B+C|
|00001370| 2b 44 2b 44 59 2d 30 2e | 35 0d 06 40 06 20 e1 0d |+D+DY-0.|5..@. ..|
|00001380| 06 4a 06 20 3a 0d 06 54 | 0c 20 dd f2 47 74 69 6d |.J. :..T|. ..Gtim|
|00001390| 65 0d 06 5e 17 20 e7 20 | 46 4c 41 47 28 33 29 3d |e..^. . |FLAG(3)=|
|000013a0| 31 20 8c 20 8d 74 6e 46 | 0d 06 68 1c 20 58 4d 4e |1 . .tnF|..h. XMN|
|000013b0| 3d 4d 4e 3a 58 44 59 3d | 44 59 3a 46 4c 41 47 28 |=MN:XDY=|DY:FLAG(|
|000013c0| 33 29 3d 31 0d 06 72 1f | 20 46 4c 41 47 28 31 29 |3)=1..r.| FLAG(1)|
|000013d0| 3d 30 3a f2 4a 75 6c 64 | 61 79 3a 58 44 4a 44 3d |=0:.Juld|ay:XDJD=|
|000013e0| 44 4a 44 0d 06 7c 18 20 | 4d 4e 3d 31 3a 44 59 3d |DJD..|. |MN=1:DY=|
|000013f0| 30 3a 46 4c 41 47 28 31 | 29 3d 30 0d 06 86 18 20 |0:FLAG(1|)=0.... |
|00001400| f2 4a 75 6c 64 61 79 3a | 54 3d 44 4a 44 2f 33 36 |.Julday:|T=DJD/36|
|00001410| 35 32 35 0d 06 90 2b 20 | 52 3d 36 2e 36 34 36 30 |525...+ |R=6.6460|
|00001420| 36 35 36 2b 28 35 2e 31 | 32 36 32 45 2d 32 2b 28 |656+(5.1|262E-2+(|
|00001430| 54 2a 32 2e 35 38 31 45 | 2d 35 29 29 2a 54 0d 06 |T*2.581E|-5))*T..|
|00001440| 9a 2a 20 52 31 3d 32 34 | 30 30 2a 28 54 2d 28 28 |.* R1=24|00*(T-((|
|00001450| 59 52 2d 31 39 30 30 29 | 2f 31 30 30 29 29 3a 42 |YR-1900)|/100)):B|
|00001460| 3d 32 34 2d 52 2d 52 31 | 0d 06 a4 21 20 54 30 3d |=24-R-R1|...! T0=|
|00001470| 28 28 58 44 4a 44 2d 44 | 4a 44 29 2a 36 2e 35 37 |((XDJD-D|JD)*6.57|
|00001480| 30 39 38 45 2d 32 29 2d | 42 0d 06 ae 13 20 e7 20 |098E-2)-|B.... . |
|00001490| 53 57 32 3d 31 20 8c 20 | 8d 64 60 46 0d 06 b8 14 |SW2=1 . |.d`F....|
|000014a0| 20 e7 20 54 30 3c 30 20 | 8c 20 54 30 2b 3d 32 34 | . T0<0 |. T0+=24|
|000014b0| 0d 06 c2 0f 20 47 54 4d | 3d 54 49 4d 2d 54 30 0d |.... GTM|=TIM-T0.|
|000014c0| 06 cc 16 20 e7 20 47 54 | 4d 3c 30 20 8c 20 47 54 |... . GT|M<0 . GT|
|000014d0| 4d 2b 3d 32 34 0d 06 d6 | 22 20 47 54 4d 3d 47 54 |M+=24...|" GTM=GT|
|000014e0| 4d 2a 39 2e 39 37 32 36 | 39 35 36 37 37 45 2d 31 |M*9.9726|95677E-1|
|000014f0| 3a e5 20 8d 64 7e 46 0d | 06 e0 1d 20 47 54 4d 3d |:. .d~F.|... GTM=|
|00001500| 28 54 49 4d 2a 31 2e 30 | 30 32 37 33 37 39 30 38 |(TIM*1.0|02737908|
|00001510| 29 2b 54 30 0d 06 ea 17 | 20 e7 20 47 54 4d 3e 32 |)+T0....| . GTM>2|
|00001520| 34 20 8c 20 47 54 4d 2d | 3d 32 34 0d 06 f4 16 20 |4 . GTM-|=24.... |
|00001530| e7 20 47 54 4d 3c 30 20 | 8c 20 47 54 4d 2b 3d 32 |. GTM<0 |. GTM+=2|
|00001540| 34 0d 06 fe 18 20 58 3d | 47 54 4d 3a 53 57 31 3d |4.... X=|GTM:SW1=|
|00001550| 31 3a f2 4d 69 6e 73 65 | 63 0d 07 08 16 20 48 53 |1:.Minse|c.... HS|
|00001560| 3d 58 44 3a 4d 53 3d 58 | 4d 3a 53 53 3d 58 53 0d |=XD:MS=X|M:SS=XS.|
|00001570| 07 12 1b 20 4d 4e 3d 58 | 4d 4e 3a 44 59 3d 58 44 |... MN=X|MN:DY=XD|
|00001580| 59 3a 44 4a 44 3d 58 44 | 4a 44 0d 07 1c 06 20 e1 |Y:DJD=XD|JD.... .|
|00001590| 0d 07 26 06 20 3a 0d 07 | 30 0c 20 dd f2 45 71 68 |..&. :..|0. ..Eqh|
|000015a0| 6f 72 0d 07 3a 17 20 e7 | 20 46 4c 41 47 28 34 29 |or..:. .| FLAG(4)|
|000015b0| 3d 31 20 8c 20 8d 44 58 | 47 0d 07 44 1c 20 43 50 |=1 . .DX|G..D. CP|
|000015c0| 48 49 3d 9b 28 50 48 49 | 29 3a 53 50 48 49 3d b5 |HI=.(PHI|):SPHI=.|
|000015d0| 28 50 48 49 29 0d 07 4e | 0e 20 46 4c 41 47 28 34 |(PHI)..N|. FLAG(4|
|000015e0| 29 3d 31 0d 07 58 14 20 | 53 59 3d b5 28 59 29 3a |)=1..X. |SY=.(Y):|
|000015f0| 43 59 3d 9b 28 59 29 0d | 07 62 14 20 53 58 3d b5 |CY=.(Y).|.b. SX=.|
|00001600| 28 58 29 3a 43 58 3d 9b | 28 58 29 0d 07 6c 1e 20 |(X):CX=.|(X)..l. |
|00001610| 53 51 3d 28 53 59 2a 53 | 50 48 49 29 2b 28 43 59 |SQ=(SY*S|PHI)+(CY|
|00001620| 2a 43 50 48 49 2a 43 58 | 29 0d 07 76 21 20 51 3d |*CPHI*CX|)..v! Q=|
|00001630| a4 41 53 4e 28 53 51 29 | 3a 43 51 3d 9b 28 51 29 |.ASN(SQ)|:CQ=.(Q)|
|00001640| 3a 41 3d 43 50 48 49 2a | 43 51 0d 07 80 18 20 e7 |:A=CPHI*|CQ.... .|
|00001650| 20 41 3c 31 45 2d 32 30 | 20 8c 20 41 3d 31 45 2d | A<1E-20| . A=1E-|
|00001660| 32 30 0d 07 8a 23 20 43 | 50 3d 28 53 59 2d 28 53 |20...# C|P=(SY-(S|
|00001670| 50 48 49 2a 53 51 29 29 | 2f 41 3a 50 3d a4 41 43 |PHI*SQ))|/A:P=.AC|
|00001680| 53 28 43 50 29 0d 07 94 | 15 20 e7 20 53 58 3e 30 |S(CP)...|. . SX>0|
|00001690| 20 8c 20 50 3d 54 50 49 | 2d 50 0d 07 9e 06 20 e1 | . P=TPI|-P.... .|
|000016a0| 0d 07 a8 06 20 3a 0d 07 | b2 0c 20 dd f2 48 72 61 |.... :..|.. ..Hra|
|000016b0| 6e 67 0d 07 bc 16 20 4c | 53 54 3d 47 53 54 2b 28 |ng.... L|ST=GST+(|
|000016c0| 4c 4f 4e 47 2f 31 35 29 | 0d 07 c6 1a 20 e7 20 4c |LONG/15)|.... . L|
|000016d0| 53 54 3e 32 34 20 8c 20 | 4c 53 54 3d 4c 53 54 2d |ST>24 . |LST=LST-|
|000016e0| 32 34 0d 07 d0 19 20 e7 | 20 4c 53 54 3c 30 20 8c |24.... .| LST<0 .|
|000016f0| 20 4c 53 54 3d 4c 53 54 | 2b 32 34 0d 07 da 0c 20 | LST=LST|+24.... |
|00001700| 50 3d 4c 53 54 2d 58 0d | 07 e4 13 20 e7 20 50 3c |P=LST-X.|... . P<|
|00001710| 30 20 8c 20 50 3d 50 2b | 32 34 0d 07 ee 06 20 e1 |0 . P=P+|24.... .|
|00001720| 0d 07 f8 06 20 3a 0d 08 | 02 0c 20 dd f2 4f 62 6c |.... :..|.. ..Obl|
|00001730| 69 71 0d 08 0c 12 20 e7 | 20 46 4c 41 47 28 35 29 |iq.... .| FLAG(5)|
|00001740| 3d 31 20 e1 0d 08 16 0e | 20 46 4c 41 47 28 35 29 |=1 .....| FLAG(5)|
|00001750| 3d 31 0d 08 20 18 20 f2 | 4a 75 6c 64 61 79 3a 54 |=1.. . .|Julday:T|
|00001760| 3d 44 4a 44 2f 33 36 35 | 32 35 0d 08 2a 2b 20 43 |=DJD/365|25..*+ C|
|00001770| 3d 28 28 28 2d 31 2e 38 | 31 45 2d 33 2a 54 29 2b |=(((-1.8|1E-3*T)+|
|00001780| 35 2e 39 45 2d 33 29 2a | 54 2b 34 2e 36 38 34 35 |5.9E-3)*|T+4.6845|
|00001790| 45 31 29 2a 54 0d 08 34 | 1f 20 45 50 53 3d 32 2e |E1)*T..4|. EPS=2.|
|000017a0| 33 34 35 32 32 39 34 34 | 34 45 31 2d 28 43 2f 33 |34522944|4E1-(C/3|
|000017b0| 36 30 30 29 0d 08 3e 1c | 20 45 50 53 52 3d 45 50 |600)..>.| EPSR=EP|
|000017c0| 53 2a 31 2e 37 35 34 33 | 32 39 32 35 32 45 2d 32 |S*1.7543|29252E-2|
|000017d0| 0d 08 48 06 20 e1 0d 08 | 52 06 20 3a 0d 08 5c 0c |..H. ...|R. :..\.|
|000017e0| 20 dd f2 45 71 65 63 6c | 0d 08 66 17 20 e7 20 46 | ..Eqecl|..f. . F|
|000017f0| 4c 41 47 28 37 29 3d 31 | 20 8c 20 8d 74 58 48 0d |LAG(7)=1| . .tXH.|
|00001800| 08 70 0e 20 46 4c 41 47 | 28 37 29 3d 31 0d 08 7a |.p. FLAG|(7)=1..z|
|00001810| 19 20 e7 20 46 4c 41 47 | 28 36 29 3d 30 20 8c 20 |. . FLAG|(6)=0 . |
|00001820| 44 45 50 53 3d 30 0d 08 | 84 1f 20 f2 4f 62 6c 69 |DEPS=0..|.. .Obli|
|00001830| 71 3a 45 50 53 31 3d a4 | 52 41 44 28 45 50 53 2b |q:EPS1=.|RAD(EPS+|
|00001840| 44 45 50 53 29 0d 08 8e | 1e 20 53 45 50 53 3d b5 |DEPS)...|. SEPS=.|
|00001850| 28 45 50 53 31 29 3a 43 | 45 50 53 3d 9b 28 45 50 |(EPS1):C|EPS=.(EP|
|00001860| 53 31 29 0d 08 98 14 20 | 43 59 3d 9b 28 59 29 3a |S1).... |CY=.(Y):|
|00001870| 53 59 3d b5 28 59 29 0d | 08 a2 1d 20 e7 20 94 28 |SY=.(Y).|... . .(|
|00001880| 43 59 29 3c 31 45 2d 32 | 30 20 8c 20 43 59 3d 31 |CY)<1E-2|0 . CY=1|
|00001890| 45 2d 32 30 0d 08 ac 1d | 20 54 59 3d 53 59 2f 43 |E-20....| TY=SY/C|
|000018a0| 59 3a 43 58 3d 9b 28 58 | 29 3a 53 58 3d b5 28 58 |Y:CX=.(X|):SX=.(X|
|000018b0| 29 0d 08 b6 22 20 53 51 | 3d 28 53 59 2a 43 45 50 |)..." SQ|=(SY*CEP|
|000018c0| 53 29 2d 28 43 59 2a 53 | 45 50 53 2a 53 58 2a 53 |S)-(CY*S|EPS*SX*S|
|000018d0| 57 33 29 0d 08 c0 29 20 | 51 3d a4 41 53 4e 28 53 |W3)...) |Q=.ASN(S|
|000018e0| 51 29 3a 41 3d 28 53 58 | 2a 43 45 50 53 29 2b 28 |Q):A=(SX|*CEPS)+(|
|000018f0| 54 59 2a 53 45 50 53 2a | 53 57 33 29 0d 08 ca 0e |TY*SEPS*|SW3)....|
|00001900| 20 50 3d 99 28 41 2f 43 | 58 29 0d 08 d4 13 20 e7 | P=.(A/C|X).... .|
|00001910| 20 43 58 3c 30 20 8c 20 | 50 3d 50 2b af 0d 08 de | CX<0 . |P=P+....|
|00001920| 16 20 e7 20 50 3e 54 50 | 49 20 8c 20 50 3d 50 2d |. . P>TP|I . P=P-|
|00001930| 54 50 49 0d 08 e8 14 20 | e7 20 50 3c 30 20 8c 20 |TPI.... |. P<0 . |
|00001940| 50 3d 50 2b 54 50 49 0d | 08 f2 06 20 e1 0d 08 fc |P=P+TPI.|... ....|
|00001950| 06 20 3a 0d 09 06 0c 20 | dd f2 4e 75 74 61 74 0d |. :.... |..Nutat.|
|00001960| 09 10 12 20 e7 20 46 4c | 41 47 28 36 29 3d 31 20 |... . FL|AG(6)=1 |
|00001970| e1 0d 09 1a 18 20 46 4c | 41 47 28 36 29 3d 31 3a |..... FL|AG(6)=1:|
|00001980| 46 4c 41 47 28 37 29 3d | 30 0d 09 24 1f 20 f2 4a |FLAG(7)=|0..$. .J|
|00001990| 75 6c 64 61 79 3a 54 3d | 44 4a 44 2f 33 36 35 32 |ulday:T=|DJD/3652|
|000019a0| 35 3a 54 32 3d 54 2a 54 | 0d 09 2e 25 20 41 3d 31 |5:T2=T*T|...% A=1|
|000019b0| 2e 30 30 30 30 32 31 33 | 35 38 45 32 2a 54 3a 42 |.0000213|58E2*T:B|
|000019c0| 3d 33 36 30 2a 28 41 2d | a8 28 41 29 29 0d 09 38 |=360*(A-|.(A))..8|
|000019d0| 1f 20 4c 53 3d 32 2e 37 | 39 36 39 36 37 45 32 2b |. LS=2.7|96967E2+|
|000019e0| 33 2e 30 33 45 2d 34 2a | 54 32 2b 42 0d 09 42 25 |3.03E-4*|T2+B..B%|
|000019f0| 20 41 3d 31 2e 33 33 36 | 38 35 35 32 33 31 45 33 | A=1.336|855231E3|
|00001a00| 2a 54 3a 42 3d 33 36 30 | 2a 28 41 2d a8 28 41 29 |*T:B=360|*(A-.(A)|
|00001a10| 29 0d 09 4c 20 20 4c 44 | 3d 32 2e 37 30 34 33 34 |)..L  LD|=2.70434|
|00001a20| 32 45 32 2d 31 2e 31 33 | 33 45 2d 33 2a 54 32 2b |2E2-1.13|3E-3*T2+|
|00001a30| 42 0d 09 56 25 20 41 3d | 39 2e 39 39 39 37 33 36 |B..V% A=|9.999736|
|00001a40| 30 35 36 45 31 2a 54 3a | 42 3d 33 36 30 2a 28 41 |056E1*T:|B=360*(A|
|00001a50| 2d a8 28 41 29 29 0d 09 | 60 1e 20 4d 53 3d 33 2e |-.(A))..|`. MS=3.|
|00001a60| 35 38 34 37 35 38 45 32 | 2d 31 2e 35 45 2d 34 2a |584758E2|-1.5E-4*|
|00001a70| 54 32 2b 42 0d 09 6a 25 | 20 41 3d 31 2e 33 32 35 |T2+B..j%| A=1.325|
|00001a80| 35 35 32 33 35 39 45 33 | 2a 54 3a 42 3d 33 36 30 |552359E3|*T:B=360|
|00001a90| 2a 28 41 2d a8 28 41 29 | 29 0d 09 74 20 20 4d 44 |*(A-.(A)|)..t  MD|
|00001aa0| 3d 32 2e 39 36 31 30 34 | 36 45 32 2b 39 2e 31 39 |=2.96104|6E2+9.19|
|00001ab0| 32 45 2d 33 2a 54 32 2b | 42 0d 09 7e 23 20 41 3d |2E-3*T2+|B..~# A=|
|00001ac0| 35 2e 33 37 32 36 31 36 | 36 36 37 2a 54 3a 42 3d |5.372616|667*T:B=|
|00001ad0| 33 36 30 2a 28 41 2d a8 | 28 41 29 29 0d 09 88 20 |360*(A-.|(A))... |
|00001ae0| 20 4e 4d 3d 32 2e 35 39 | 31 38 33 33 45 32 2b 32 | NM=2.59|1833E2+2|
|00001af0| 2e 30 37 38 45 2d 33 2a | 54 32 2d 42 0d 09 92 1f |.078E-3*|T2-B....|
|00001b00| 20 54 4c 53 3d 32 2a a4 | 52 41 44 28 4c 53 29 3a | TLS=2*.|RAD(LS):|
|00001b10| 4e 4d 3d a4 52 41 44 28 | 4e 4d 29 0d 09 9c 1f 20 |NM=.RAD(|NM).... |
|00001b20| 54 4e 4d 3d 32 2a a4 52 | 41 44 28 4e 4d 29 3a 4d |TNM=2*.R|AD(NM):M|
|00001b30| 53 3d a4 52 41 44 28 4d | 53 29 0d 09 a6 1f 20 54 |S=.RAD(M|S).... T|
|00001b40| 4c 44 3d 32 2a a4 52 41 | 44 28 4c 44 29 3a 4d 44 |LD=2*.RA|D(LD):MD|
|00001b50| 3d a4 52 41 44 28 4d 44 | 29 0d 09 b0 da 20 44 50 |=.RAD(MD|).... DP|
|00001b60| 53 49 3d 28 2d 31 37 2e | 32 33 32 37 2d 31 2e 37 |SI=(-17.|2327-1.7|
|00001b70| 33 37 45 2d 32 2a 54 29 | 2a b5 28 4e 4d 29 2b 28 |37E-2*T)|*.(NM)+(|
|00001b80| 2d 31 2e 32 37 32 39 2d | 31 2e 33 45 2d 34 2a 54 |-1.2729-|1.3E-4*T|
|00001b90| 29 2a b5 28 54 4c 53 29 | 2b 32 2e 30 38 38 45 2d |)*.(TLS)|+2.088E-|
|00001ba0| 31 2a b5 28 54 4e 4d 29 | 2d 32 2e 30 33 37 45 2d |1*.(TNM)|-2.037E-|
|00001bb0| 31 2a b5 28 54 4c 44 29 | 2b 28 31 2e 32 36 31 45 |1*.(TLD)|+(1.261E|
|00001bc0| 2d 31 2d 33 2e 31 45 2d | 34 2a 54 29 2a b5 28 4d |-1-3.1E-|4*T)*.(M|
|00001bd0| 53 29 2b 36 2e 37 35 45 | 2d 32 2a b5 28 4d 44 29 |S)+6.75E|-2*.(MD)|
|00001be0| 2d 28 34 2e 39 37 45 2d | 32 2d 31 2e 32 45 2d 34 |-(4.97E-|2-1.2E-4|
|00001bf0| 2a 54 29 2a b5 28 54 4c | 53 2b 4d 53 29 2d 33 2e |*T)*.(TL|S+MS)-3.|
|00001c00| 34 32 45 2d 32 2a b5 28 | 54 4c 44 2d 4e 4d 29 2d |42E-2*.(|TLD-NM)-|
|00001c10| 32 2e 36 31 45 2d 32 2a | b5 28 54 4c 44 2b 4d 44 |2.61E-2*|.(TLD+MD|
|00001c20| 29 2b 32 2e 31 34 45 2d | 32 2a b5 28 54 4c 53 2d |)+2.14E-|2*.(TLS-|
|00001c30| 4d 53 29 0d 09 ba 48 20 | 44 50 53 49 3d 44 50 53 |MS)...H |DPSI=DPS|
|00001c40| 49 2d 31 2e 34 39 45 2d | 32 2a b5 28 54 4c 53 2d |I-1.49E-|2*.(TLS-|
|00001c50| 54 4c 44 2b 4d 44 29 2b | 31 2e 32 34 45 2d 32 2a |TLD+MD)+|1.24E-2*|
|00001c60| b5 28 54 4c 53 2d 4e 4d | 29 2b 31 2e 31 34 45 2d |.(TLS-NM|)+1.14E-|
|00001c70| 32 2a b5 28 54 4c 44 2d | 4d 44 29 0d 09 c4 b0 20 |2*.(TLD-|MD).... |
|00001c80| 44 45 50 53 3d 28 39 2e | 32 31 2b 39 2e 31 45 2d |DEPS=(9.|21+9.1E-|
|00001c90| 34 2a 54 29 2a 9b 28 4e | 4d 29 2b 28 35 2e 35 32 |4*T)*.(N|M)+(5.52|
|00001ca0| 32 45 2d 31 2d 32 2e 39 | 45 2d 34 2a 54 29 2a 9b |2E-1-2.9|E-4*T)*.|
|00001cb0| 28 54 4c 53 29 2d 39 2e | 30 34 45 2d 32 2a 9b 28 |(TLS)-9.|04E-2*.(|
|00001cc0| 54 4e 4d 29 2b 38 2e 38 | 34 45 2d 32 2a 9b 28 54 |TNM)+8.8|4E-2*.(T|
|00001cd0| 4c 44 29 2b 32 2e 31 36 | 45 2d 32 2a 9b 28 54 4c |LD)+2.16|E-2*.(TL|
|00001ce0| 53 2b 4d 53 29 2b 31 2e | 38 33 45 2d 32 2a 9b 28 |S+MS)+1.|83E-2*.(|
|00001cf0| 54 4c 44 2d 4e 4d 29 2b | 31 2e 31 33 45 2d 32 2a |TLD-NM)+|1.13E-2*|
|00001d00| 9b 28 54 4c 44 2b 4d 44 | 29 2d 39 2e 33 45 2d 33 |.(TLD+MD|)-9.3E-3|
|00001d10| 2a 9b 28 54 4c 53 2d 4d | 53 29 2d 36 2e 36 45 2d |*.(TLS-M|S)-6.6E-|
|00001d20| 33 2a 9b 28 54 4c 53 2d | 4e 4d 29 0d 09 ce 22 20 |3*.(TLS-|NM)..." |
|00001d30| 44 50 53 49 3d 44 50 53 | 49 2f 33 36 30 30 3a 44 |DPSI=DPS|I/3600:D|
|00001d40| 45 50 53 3d 44 45 50 53 | 2f 33 36 30 30 0d 09 d8 |EPS=DEPS|/3600...|
|00001d50| 06 20 e1 0d 09 e2 06 20 | 3a 0d 09 ec 0e 20 dd f2 |. ..... |:.... ..|
|00001d60| 41 6e 6f 6d 61 6c 79 0d | 09 f6 1c 20 4d 3d 4d 41 |Anomaly.|... M=MA|
|00001d70| 2d 54 50 49 2a a8 28 4d | 41 2f 54 50 49 29 3a 45 |-TPI*.(M|A/TPI):E|
|00001d80| 41 3d 4d 0d 0a 00 17 20 | 44 4c 41 3d 45 41 2d 28 |A=M.... |DLA=EA-(|
|00001d90| 53 2a b5 28 45 41 29 29 | 2d 4d 0d 0a 0a 19 20 e7 |S*.(EA))|-M.... .|
|00001da0| 20 94 28 44 4c 41 29 3c | 31 45 2d 36 20 8c 20 8d | .(DLA)<|1E-6 . .|
|00001db0| 54 68 4a 0d 0a 14 1a 20 | 44 4c 41 3d 44 4c 41 2f |ThJ.... |DLA=DLA/|
|00001dc0| 28 31 2d 28 53 2a 9b 28 | 45 41 29 29 29 0d 0a 1e |(1-(S*.(|EA)))...|
|00001dd0| 15 20 45 41 3d 45 41 2d | 44 4c 41 3a e5 20 8d 54 |. EA=EA-|DLA:. .T|
|00001de0| 40 4a 0d 0a 28 20 20 54 | 4e 55 32 3d b6 28 28 31 |@J..(  T|NU2=.((1|
|00001df0| 2b 53 29 2f 28 31 2d 53 | 29 29 2a b7 28 45 41 2f |+S)/(1-S|))*.(EA/|
|00001e00| 32 29 0d 0a 32 11 20 4e | 55 3d 32 2a 99 28 54 4e |2)..2. N|U=2*.(TN|
|00001e10| 55 32 29 0d 0a 3c 06 20 | e1 0d 0a 46 06 20 3a 0d |U2)..<. |...F. :.|
|00001e20| 0a 50 0a 20 dd f2 53 75 | 6e 0d 0a 5a 1f 20 f2 4a |.P. ..Su|n..Z. .J|
|00001e30| 75 6c 64 61 79 3a 54 3d | 44 4a 44 2f 33 36 35 32 |ulday:T=|DJD/3652|
|00001e40| 35 3a 54 32 3d 54 2a 54 | 0d 0a 64 25 20 41 3d 31 |5:T2=T*T|..d% A=1|
|00001e50| 2e 30 30 30 30 32 31 33 | 35 39 45 32 2a 54 3a 42 |.0000213|59E2*T:B|
|00001e60| 3d 33 36 30 2a 28 41 2d | a8 28 41 29 29 0d 0a 6e |=360*(A-|.(A))..n|
|00001e70| 21 20 4c 53 3d 32 2e 37 | 39 36 39 36 36 38 45 32 |! LS=2.7|969668E2|
|00001e80| 2b 33 2e 30 32 35 45 2d | 34 2a 54 32 2b 42 0d 0a |+3.025E-|4*T2+B..|
|00001e90| 78 25 20 41 3d 39 2e 39 | 39 39 37 33 36 30 34 32 |x% A=9.9|99736042|
|00001ea0| 45 31 2a 54 3a 42 3d 33 | 36 30 2a 28 41 2d a8 28 |E1*T:B=3|60*(A-.(|
|00001eb0| 41 29 29 0d 0a 82 2a 20 | 4d 53 3d 33 2e 35 38 34 |A))...* |MS=3.584|
|00001ec0| 37 35 38 33 45 32 2d 28 | 31 2e 35 45 2d 34 2b 33 |7583E2-(|1.5E-4+3|
|00001ed0| 2e 33 45 2d 36 2a 54 29 | 2a 54 32 2b 42 0d 0a 8c |.3E-6*T)|*T2+B...|
|00001ee0| 27 20 53 3d 31 2e 36 37 | 35 31 30 34 45 2d 32 2d |' S=1.67|5104E-2-|
|00001ef0| 34 2e 31 38 45 2d 35 2a | 54 2d 31 2e 32 36 45 2d |4.18E-5*|T-1.26E-|
|00001f00| 37 2a 54 32 0d 0a 96 19 | 20 4d 41 3d a4 52 41 44 |7*T2....| MA=.RAD|
|00001f10| 28 4d 53 29 3a f2 41 6e | 6f 6d 61 6c 79 0d 0a a0 |(MS):.An|omaly...|
|00001f20| 25 20 41 3d 36 2e 32 35 | 35 32 30 39 34 37 32 45 |% A=6.25|5209472E|
|00001f30| 31 2a 54 3a 42 3d 33 36 | 30 2a 28 41 2d a8 28 41 |1*T:B=36|0*(A-.(A|
|00001f40| 29 29 0d 0a aa 16 20 41 | 31 3d a4 52 41 44 28 31 |)).... A|1=.RAD(1|
|00001f50| 35 33 2e 32 33 2b 42 29 | 0d 0a b4 25 20 41 3d 31 |53.23+B)|...% A=1|
|00001f60| 2e 32 35 31 30 34 31 38 | 39 34 45 32 2a 54 3a 42 |.2510418|94E2*T:B|
|00001f70| 3d 33 36 30 2a 28 41 2d | a8 28 41 29 29 0d 0a be |=360*(A-|.(A))...|
|00001f80| 16 20 42 31 3d a4 52 41 | 44 28 32 31 36 2e 35 37 |. B1=.RA|D(216.57|
|00001f90| 2b 42 29 0d 0a c8 25 20 | 41 3d 39 2e 31 35 36 37 |+B)...% |A=9.1567|
|00001fa0| 36 36 30 32 38 45 31 2a | 54 3a 42 3d 33 36 30 2a |66028E1*|T:B=360*|
|00001fb0| 28 41 2d a8 28 41 29 29 | 0d 0a d2 16 20 43 31 3d |(A-.(A))|.... C1=|
|00001fc0| a4 52 41 44 28 33 31 32 | 2e 36 39 2b 42 29 0d 0a |.RAD(312|.69+B)..|
|00001fd0| dc 25 20 41 3d 31 2e 32 | 33 36 38 35 33 30 39 35 |.% A=1.2|36853095|
|00001fe0| 45 33 2a 54 3a 42 3d 33 | 36 30 2a 28 41 2d a8 28 |E3*T:B=3|60*(A-.(|
|00001ff0| 41 29 29 0d 0a e6 21 20 | 44 31 3d a4 52 41 44 28 |A))...! |D1=.RAD(|
|00002000| 33 35 30 2e 37 34 2d 31 | 2e 34 34 45 2d 33 2a 54 |350.74-1|.44E-3*T|
|00002010| 32 2b 42 29 0d 0a f0 1b | 20 45 31 3d a4 52 41 44 |2+B)....| E1=.RAD|
|00002020| 28 32 33 31 2e 31 39 2b | 32 30 2e 32 2a 54 29 0d |(231.19+|20.2*T).|
|00002030| 0a fa 25 20 41 3d 31 2e | 38 33 31 33 35 33 32 30 |..% A=1.|83135320|
|00002040| 38 45 32 2a 54 3a 42 3d | 33 36 30 2a 28 41 2d a8 |8E2*T:B=|360*(A-.|
|00002050| 28 41 29 29 0d 0b 04 15 | 20 48 31 3d a4 52 41 44 |(A))....| H1=.RAD|
|00002060| 28 33 35 33 2e 34 2b 42 | 29 0d 0b 0e 4a 20 44 4c |(353.4+B|)...J DL|
|00002070| 3d 31 2e 33 34 45 2d 33 | 2a 9b 28 41 31 29 2b 31 |=1.34E-3|*.(A1)+1|
|00002080| 2e 35 34 45 2d 33 2a 9b | 28 42 31 29 2b 32 45 2d |.54E-3*.|(B1)+2E-|
|00002090| 33 2a 9b 28 43 31 29 2b | 31 2e 37 39 45 2d 33 2a |3*.(C1)+|1.79E-3*|
|000020a0| b5 28 44 31 29 2b 31 2e | 37 38 45 2d 33 2a b5 28 |.(D1)+1.|78E-3*.(|
|000020b0| 45 31 29 0d 0b 18 50 20 | 44 52 3d 35 2e 34 33 45 |E1)...P |DR=5.43E|
|000020c0| 2d 36 2a b5 28 41 31 29 | 2b 31 2e 35 37 35 45 2d |-6*.(A1)|+1.575E-|
|000020d0| 35 2a b5 28 42 31 29 2b | 31 2e 36 32 37 45 2d 35 |5*.(B1)+|1.627E-5|
|000020e0| 2a b5 28 43 31 29 2b 33 | 2e 30 37 36 45 2d 35 2a |*.(C1)+3|.076E-5*|
|000020f0| 9b 28 44 31 29 2b 39 2e | 32 37 45 2d 36 2a b5 28 |.(D1)+9.|27E-6*.(|
|00002100| 48 31 29 0d 0b 22 1a 20 | 4c 53 4e 3d 4e 55 2b a4 |H1)..". |LSN=NU+.|
|00002110| 52 41 44 28 4c 53 2d 4d | 53 2b 44 4c 29 0d 0b 2c |RAD(LS-M|S+DL)..,|
|00002120| 21 20 52 53 4e 3d 31 2e | 30 30 30 30 30 30 32 2a |! RSN=1.|0000002*|
|00002130| 28 31 2d 53 2a 9b 28 45 | 41 29 29 2b 44 52 0d 0b |(1-S*.(E|A))+DR..|
|00002140| 36 21 20 e7 20 4c 53 4e | 3c 30 20 8c 20 4c 53 4e |6! . LSN|<0 . LSN|
|00002150| 3d 4c 53 4e 2b 54 50 49 | 3a e5 20 8d 54 76 4b 0d |=LSN+TPI|:. .TvK.|
|00002160| 0b 40 23 20 e7 20 4c 53 | 4e 3e 54 50 49 20 8c 20 |.@# . LS|N>TPI . |
|00002170| 4c 53 4e 3d 4c 53 4e 2d | 54 50 49 3a e5 20 8d 44 |LSN=LSN-|TPI:. .D|
|00002180| 40 4b 0d 0b 4a 06 20 e1 | 0d 0b 54 06 20 3a 0d 0b |@K..J. .|..T. :..|
|00002190| 5e 0f 20 dd f2 50 65 6c | 65 6d 65 6e 74 0d 0b 68 |^. ..Pel|ement..h|
|000021a0| 28 20 dc 22 4d 45 52 43 | 55 52 59 22 2c 22 56 45 |( ."MERC|URY","VE|
|000021b0| 4e 55 53 22 2c 22 4d 41 | 52 53 22 2c 22 4a 55 50 |NUS","MA|RS","JUP|
|000021c0| 49 54 45 52 22 0d 0b 72 | 29 20 dc 22 53 41 54 55 |ITER"..r|) ."SATU|
|000021d0| 52 4e 22 2c 22 55 52 41 | 4e 55 53 22 2c 22 4e 45 |RN","URA|NUS","NE|
|000021e0| 50 54 55 4e 45 22 2c 22 | 50 4c 55 54 4f 22 0d 0b |PTUNE","|PLUTO"..|
|000021f0| 7c 06 20 3a 0d 0b 86 15 | 20 f4 20 20 20 4d 65 72 ||. :....| .   Mer|
|00002200| 63 75 72 79 2e 2e 2e 2e | 2e 0d 0b 90 06 20 3a 0d |cury....|..... :.|
|00002210| 0b 9a 27 20 dc 31 37 38 | 2e 31 37 39 30 37 38 2c |..' .178|.179078,|
|00002220| 34 31 35 2e 32 30 35 37 | 35 31 39 2c 33 2e 30 31 |415.2057|519,3.01|
|00002230| 31 45 2d 34 2c 30 0d 0b | a4 24 20 dc 37 35 2e 38 |1E-4,0..|.$ .75.8|
|00002240| 39 39 36 39 37 2c 31 2e | 35 35 35 34 38 38 39 2c |99697,1.|5554889,|
|00002250| 32 2e 39 34 37 45 2d 34 | 2c 30 0d 0b ae 23 20 dc |2.947E-4|,0...# .|
|00002260| 32 2e 30 35 36 31 34 32 | 31 45 2d 31 2c 32 2e 30 |2.056142|1E-1,2.0|
|00002270| 34 36 45 2d 35 2c 2d 33 | 45 2d 38 2c 30 0d 0b b8 |46E-5,-3|E-8,0...|
|00002280| 23 20 dc 37 2e 30 30 32 | 38 38 31 2c 31 2e 38 36 |# .7.002|881,1.86|
|00002290| 30 38 45 2d 33 2c 2d 31 | 2e 38 33 45 2d 35 2c 30 |08E-3,-1|.83E-5,0|
|000022a0| 0d 0b c2 24 20 dc 34 37 | 2e 31 34 35 39 34 34 2c |...$ .47|.145944,|
|000022b0| 31 2e 31 38 35 32 2e 33 | 38 2c 31 2e 37 33 39 45 |1.1852.3|8,1.739E|
|000022c0| 2d 34 2c 30 0d 0b cc 1c | 20 dc 33 2e 38 37 30 39 |-4,0....| .3.8709|
|000022d0| 38 36 45 2d 31 2c 36 2e | 37 34 2c 2d 30 2e 34 32 |86E-1,6.|74,-0.42|
|000022e0| 0d 0b d6 06 20 3a 0d 0b | e0 13 20 f4 20 20 20 56 |.... :..|.. .   V|
|000022f0| 65 6e 75 73 2e 2e 2e 2e | 2e 0d 0b ea 06 20 3a 0d |enus....|..... :.|
|00002300| 0b f4 27 20 dc 33 34 32 | 2e 37 36 37 30 35 33 2c |..' .342|.767053,|
|00002310| 31 36 32 2e 35 35 33 33 | 36 36 34 2c 33 2e 30 39 |162.5533|664,3.09|
|00002320| 37 45 2d 34 2c 30 0d 0b | fe 26 20 dc 31 33 30 2e |7E-4,0..|.& .130.|
|00002330| 31 36 33 38 33 33 2c 31 | 2e 34 30 38 30 33 36 31 |163833,1|.4080361|
|00002340| 2c 2d 39 2e 37 36 34 45 | 2d 34 2c 30 0d 0c 08 23 |,-9.764E|-4,0...#|
|00002350| 20 dc 36 2e 38 32 30 36 | 39 45 2d 33 2c 2d 34 2e | .6.8206|9E-3,-4.|
|00002360| 37 37 34 45 2d 35 2c 39 | 2e 31 45 2d 38 2c 30 0d |774E-5,9|.1E-8,0.|
|00002370| 0c 12 20 20 dc 33 2e 33 | 39 33 36 33 31 2c 31 2e |..  .3.3|93631,1.|
|00002380| 30 30 35 38 45 2d 33 2c | 2d 31 45 2d 36 2c 30 0d |0058E-3,|-1E-6,0.|
|00002390| 0c 1c 22 20 dc 37 35 2e | 37 37 39 36 34 37 2c 38 |.." .75.|779647,8|
|000023a0| 2e 39 39 38 35 45 2d 31 | 2c 34 2e 31 45 2d 34 2c |.9985E-1|,4.1E-4,|
|000023b0| 30 0d 0c 26 1c 20 dc 37 | 2e 32 33 33 33 31 36 45 |0..&. .7|.233316E|
|000023c0| 2d 31 2c 31 36 2e 39 32 | 2c 2d 34 2e 34 0d 0c 30 |-1,16.92|,-4.4..0|
|000023d0| 06 20 3a 0d 0c 3a 12 20 | f4 20 20 20 4d 61 72 73 |. :..:. |.   Mars|
|000023e0| 2e 2e 2e 2e 2e 0d 0c 44 | 06 20 3a 0d 0c 4e 27 20 |.......D|. :..N' |
|000023f0| dc 32 39 33 2e 37 33 37 | 33 33 34 2c 35 33 2e 31 |.293.737|334,53.1|
|00002400| 37 31 33 37 36 34 32 2c | 33 2e 31 30 37 45 2d 34 |7137642,|3.107E-4|
|00002410| 2c 30 0d 0c 58 25 20 dc | 33 2e 33 34 32 31 38 32 |,0..X% .|3.342182|
|00002420| 30 33 45 32 2c 31 2e 38 | 34 30 37 35 38 34 2c 31 |03E2,1.8|407584,1|
|00002430| 2e 32 39 39 45 2d 34 0d | 0c 62 0e 20 dc 2d 31 2e |.299E-4.|.b. .-1.|
|00002440| 31 39 45 2d 36 0d 0c 6c | 24 20 dc 39 2e 33 33 31 |19E-6..l|$ .9.331|
|00002450| 32 39 45 2d 32 2c 39 2e | 32 30 36 34 45 2d 35 2c |29E-2,9.|2064E-5,|
|00002460| 2d 37 2e 37 45 2d 38 2c | 30 0d 0c 76 21 20 dc 31 |-7.7E-8,|0..v! .1|
|00002470| 2e 38 35 30 33 33 33 2c | 2d 36 2e 37 35 45 2d 34 |.850333,|-6.75E-4|
|00002480| 2c 31 2e 32 36 45 2d 35 | 2c 30 0d 0c 80 23 20 dc |,1.26E-5|,0...# .|
|00002490| 34 38 2e 37 38 36 34 34 | 32 2c 37 2e 37 30 39 39 |48.78644|2,7.7099|
|000024a0| 31 37 45 2d 31 2c 2d 31 | 2e 34 45 2d 36 0d 0c 8a |17E-1,-1|.4E-6...|
|000024b0| 0e 20 dc 2d 35 2e 33 33 | 45 2d 36 0d 0c 94 1a 20 |. .-5.33|E-6.... |
|000024c0| dc 31 2e 35 32 33 36 38 | 38 33 2c 39 2e 33 36 2c |.1.52368|83,9.36,|
|000024d0| 2d 31 2e 35 32 0d 0c 9e | 06 20 3a 0d 0c a8 14 20 |-1.52...|. :.... |
|000024e0| f4 20 20 20 4a 75 70 69 | 74 65 72 2e 2e 2e 2e 0d |.   Jupi|ter.....|
|000024f0| 0c b2 06 20 3a 0d 0c bc | 25 20 dc 32 33 38 2e 30 |... :...|% .238.0|
|00002500| 34 39 32 35 37 2c 38 2e | 34 33 34 31 37 32 31 38 |49257,8.|43417218|
|00002510| 33 2c 33 2e 33 34 37 45 | 2d 34 0d 0c c6 0e 20 dc |3,3.347E|-4.... .|
|00002520| 2d 31 2e 36 35 45 2d 36 | 0d 0c d0 26 20 dc 31 2e |-1.65E-6|...& .1.|
|00002530| 32 37 32 30 39 37 32 45 | 31 2c 31 2e 36 30 39 39 |2720972E|1,1.6099|
|00002540| 36 31 37 2c 31 2e 30 35 | 36 32 37 45 2d 33 0d 0c |617,1.05|627E-3..|
|00002550| da 0e 20 dc 2d 33 2e 34 | 33 45 2d 36 0d 0c e4 25 |.. .-3.4|3E-6...%|
|00002560| 20 dc 34 2e 38 33 33 34 | 37 35 45 2d 32 2c 31 2e | .4.8334|75E-2,1.|
|00002570| 36 34 31 38 45 2d 34 2c | 2d 34 2e 36 37 36 45 2d |6418E-4,|-4.676E-|
|00002580| 37 0d 0c ee 0d 20 dc 2d | 31 2e 37 45 2d 39 0d 0c |7.... .-|1.7E-9..|
|00002590| f8 22 20 dc 31 2e 33 30 | 38 37 33 36 2c 2d 35 2e |." .1.30|8736,-5.|
|000025a0| 36 39 36 31 45 2d 33 2c | 33 2e 39 45 2d 36 2c 30 |6961E-3,|3.9E-6,0|
|000025b0| 0d 0d 02 2b 20 dc 20 39 | 39 2e 34 34 33 34 31 34 |...+ . 9|9.443414|
|000025c0| 2c 31 2e 30 31 30 35 33 | 2c 33 2e 35 32 32 32 45 |,1.01053|,3.5222E|
|000025d0| 2d 34 2c 2d 38 2e 35 31 | 45 2d 36 0d 0d 0c 1a 20 |-4,-8.51|E-6.... |
|000025e0| dc 35 2e 32 30 32 35 36 | 31 2c 31 39 36 2e 37 34 |.5.20256|1,196.74|
|000025f0| 2c 2d 39 2e 34 0d 0d 16 | 06 20 3a 0d 0d 20 13 20 |,-9.4...|. :.. . |
|00002600| f4 20 20 20 53 61 74 75 | 72 6e 2e 2e 2e 2e 0d 0d |.   Satu|rn......|
|00002610| 2a 06 20 3a 0d 0d 34 25 | 20 dc 32 36 36 2e 35 36 |*. :..4%| .266.56|
|00002620| 34 33 37 37 2c 33 2e 33 | 39 38 36 33 38 35 36 37 |4377,3.3|98638567|
|00002630| 2c 33 2e 32 34 35 45 2d | 34 0d 0d 3e 0d 20 dc 2d |,3.245E-|4..>. .-|
|00002640| 35 2e 38 45 2d 36 0d 0d | 48 25 20 dc 39 2e 31 30 |5.8E-6..|H% .9.10|
|00002650| 39 38 32 31 34 45 31 2c | 31 2e 39 35 38 34 31 35 |98214E1,|1.958415|
|00002660| 38 2c 38 2e 32 36 33 36 | 45 2d 34 0d 0d 52 0d 20 |8,8.2636|E-4..R. |
|00002670| dc 34 2e 36 31 45 2d 36 | 0d 0d 5c 24 20 dc 35 2e |.4.61E-6|..\$ .5.|
|00002680| 35 38 39 32 33 32 45 2d | 32 2c 2d 33 2e 34 35 35 |589232E-|2,-3.455|
|00002690| 45 2d 34 2c 2d 37 2e 32 | 38 45 2d 37 0d 0d 66 0d |E-4,-7.2|8E-7..f.|
|000026a0| 20 dc 37 2e 34 45 2d 31 | 30 0d 0d 70 28 20 dc 32 | .7.4E-1|0..p( .2|
|000026b0| 2e 34 39 32 35 31 39 2c | 2d 33 2e 39 31 38 39 45 |.492519,|-3.9189E|
|000026c0| 2d 33 2c 2d 31 2e 35 34 | 39 45 2d 35 2c 34 45 2d |-3,-1.54|9E-5,4E-|
|000026d0| 38 0d 0d 7a 27 20 dc 31 | 31 32 2e 37 39 30 34 31 |8..z' .1|12.79041|
|000026e0| 34 2c 38 2e 37 33 31 39 | 35 31 45 2d 31 2c 2d 31 |4,8.7319|51E-1,-1|
|000026f0| 2e 35 32 31 38 45 2d 34 | 0d 0d 84 0e 20 dc 2d 35 |.5218E-4|.... .-5|
|00002700| 2e 33 31 45 2d 36 0d 0d | 8e 1a 20 dc 39 2e 35 35 |.31E-6..|.. .9.55|
|00002710| 34 37 34 37 2c 31 36 35 | 2e 36 2c 2d 38 2e 38 38 |4747,165|.6,-8.88|
|00002720| 0d 0d 98 06 20 3a 0d 0d | a2 13 20 f4 20 20 20 55 |.... :..|.. .   U|
|00002730| 72 61 6e 75 73 2e 2e 2e | 2e 0d 0d ac 06 20 3a 0d |ranus...|..... :.|
|00002740| 0d b6 29 20 dc 32 34 34 | 2e 31 39 37 34 37 2c 31 |..) .244|.19747,1|
|00002750| 2e 31 39 34 30 36 35 34 | 30 36 2c 33 2e 31 36 45 |.1940654|06,3.16E|
|00002760| 2d 34 2c 2d 36 45 2d 37 | 0d 0d c0 25 20 dc 31 2e |-4,-6E-7|...% .1.|
|00002770| 37 31 35 34 38 36 39 32 | 45 32 2c 31 2e 34 38 34 |71548692|E2,1.484|
|00002780| 34 33 32 38 2c 32 2e 33 | 37 32 45 2d 34 0d 0d ca |4328,2.3|72E-4...|
|00002790| 0d 20 dc 2d 36 2e 31 45 | 2d 37 0d 0d d4 23 20 dc |. .-6.1E|-7...# .|
|000027a0| 34 2e 36 33 34 34 34 45 | 2d 32 2c 2d 32 2e 36 35 |4.63444E|-2,-2.65|
|000027b0| 38 45 2d 35 2c 37 2e 37 | 45 2d 38 2c 30 0d 0d de |8E-5,7.7|E-8,0...|
|000027c0| 23 20 dc 37 2e 37 32 34 | 36 34 45 2d 31 2c 36 2e |# .7.724|64E-1,6.|
|000027d0| 32 35 33 45 2d 34 2c 33 | 2e 39 35 45 2d 35 2c 30 |253E-4,3|.95E-5,0|
|000027e0| 0d 0d e8 27 20 dc 37 33 | 2e 34 37 37 31 31 31 2c |...' .73|.477111,|
|000027f0| 34 2e 39 38 36 36 37 38 | 45 2d 31 2c 31 2e 33 31 |4.986678|E-1,1.31|
|00002800| 31 37 45 2d 33 2c 30 0d | 0d f2 19 20 dc 31 39 2e |17E-3,0.|... .19.|
|00002810| 32 31 38 31 34 2c 36 35 | 2e 38 2c 2d 37 2e 31 39 |21814,65|.8,-7.19|
|00002820| 0d 0d fc 06 20 3a 0d 0e | 06 15 20 f4 20 20 20 20 |.... :..|.. .    |
|00002830| 4e 65 70 74 75 6e 65 2e | 2e 2e 2e 0d 0e 10 06 20 |Neptune.|....... |
|00002840| 3a 0d 0e 1a 27 20 dc 38 | 34 2e 34 35 37 39 39 34 |:...' .8|4.457994|
|00002850| 2c 36 2e 31 30 37 39 34 | 32 30 35 36 45 2d 31 2c |,6.10794|2056E-1,|
|00002860| 33 2e 32 30 35 45 2d 34 | 0d 0e 24 0b 20 dc 2d 36 |3.205E-4|..$. .-6|
|00002870| 45 2d 37 0d 0e 2e 25 20 | dc 34 2e 36 37 32 37 33 |E-7...% |.4.67273|
|00002880| 36 34 45 31 2c 31 2e 34 | 32 34 35 37 34 34 2c 33 |64E1,1.4|245744,3|
|00002890| 2e 39 30 38 32 45 2d 34 | 0d 0e 38 0e 20 dc 2d 36 |.9082E-4|..8. .-6|
|000028a0| 2e 30 35 45 2d 37 0d 0e | 42 20 20 dc 38 2e 39 39 |.05E-7..|B  .8.99|
|000028b0| 37 30 34 45 2d 33 2c 36 | 2e 33 33 45 2d 36 2c 2d |704E-3,6|.33E-6,-|
|000028c0| 32 45 2d 39 2c 30 0d 0e | 4c 23 20 dc 31 2e 37 37 |2E-9,0..|L# .1.77|
|000028d0| 39 32 34 32 2c 2d 39 2e | 35 34 33 36 45 2d 33 2c |9242,-9.|5436E-3,|
|000028e0| 2d 39 2e 31 45 2d 36 2c | 30 0d 0e 56 23 20 dc 31 |-9.1E-6,|0..V# .1|
|000028f0| 33 30 2e 36 38 31 33 38 | 39 2c 31 2e 30 39 38 39 |30.68138|9,1.0989|
|00002900| 33 35 2c 32 2e 34 39 38 | 37 45 2d 34 0d 0e 60 0f |35,2.498|7E-4..`.|
|00002910| 20 dc 2d 34 2e 37 31 38 | 45 2d 36 0d 0e 6a 19 20 | .-4.718|E-6..j. |
|00002920| dc 33 30 2e 31 30 39 35 | 37 2c 36 32 2e 32 2c 2d |.30.1095|7,62.2,-|
|00002930| 36 2e 38 37 0d 0e 74 06 | 20 3a 0d 0e 7e 2c 20 f4 |6.87..t.| :..~, .|
|00002940| 20 20 20 50 6c 75 74 6f | 2e 2e 2e 2e 2e 20 28 6f |   Pluto|..... (o|
|00002950| 73 63 75 6c 61 74 69 6e | 67 20 31 39 38 34 20 4a |sculatin|g 1984 J|
|00002960| 61 6e 20 32 31 29 0d 0e | 88 06 20 3a 0d 0e 92 23 |an 21)..|.. :...#|
|00002970| 20 dc 39 35 2e 33 31 31 | 33 35 34 34 2c 33 2e 39 | .95.311|3544,3.9|
|00002980| 38 30 33 33 32 31 36 37 | 45 2d 31 2c 30 2c 30 0d |80332167|E-1,0,0.|
|00002990| 0e 9c 13 20 dc 32 32 34 | 2e 30 31 37 2c 30 2c 30 |... .224|.017,0,0|
|000029a0| 2c 30 0d 0e a6 15 20 dc | 32 2e 35 35 31 35 45 2d |,0.... .|2.5515E-|
|000029b0| 31 2c 30 2c 30 2c 30 0d | 0e b0 13 20 dc 31 37 2e |1,0,0,0.|... .17.|
|000029c0| 31 33 32 39 2c 30 2c 30 | 2c 30 0d 0e ba 13 20 dc |1329,0,0|,0.... .|
|000029d0| 31 31 30 2e 31 39 31 2c | 30 2c 30 2c 30 0d 0e c4 |110.191,|0,0,0...|
|000029e0| 16 20 dc 33 39 2e 38 31 | 35 31 2c 38 2e 32 2c 2d |. .39.81|51,8.2,-|
|000029f0| 31 2e 30 0d 0e ce 0b 20 | f7 3a 49 50 3d 30 0d 0e |1.0.... |.:IP=0..|
|00002a00| d8 18 20 f2 4a 75 6c 64 | 61 79 3a 54 3d 44 4a 44 |.. .Juld|ay:T=DJD|
|00002a10| 2f 33 36 35 32 35 0d 0e | e2 18 20 e3 20 4a 3d 31 |/36525..|.. . J=1|
|00002a20| 20 b8 20 38 3a f3 20 50 | 4c 41 4e 45 54 24 0d 0e | . 8:. P|LANET$..|
|00002a30| ec 2b 20 e7 20 c0 50 4c | 41 4e 45 54 24 2c 32 29 |.+ . .PL|ANET$,2)|
|00002a40| 3d c0 50 24 2c 32 29 20 | 8c 20 49 50 3d 4a 3a 50 |=.P$,2) |. IP=J:P|
|00002a50| 24 3d 50 4c 41 4e 45 54 | 24 0d 0e f6 08 20 ed 20 |$=PLANET|$.... . |
|00002a60| 4a 0d 0f 00 0d 20 e7 20 | 49 50 3d 30 20 e1 0d 0f |J.... . |IP=0 ...|
|00002a70| 0a 0e 20 e3 20 49 3d 31 | 20 b8 20 38 0d 0f 14 19 |.. . I=1| . 8....|
|00002a80| 20 f3 41 30 2c 41 31 2c | 41 32 2c 41 33 3a 41 41 | .A0,A1,|A2,A3:AA|
|00002a90| 3d 41 31 2a 54 0d 0f 1e | 15 20 42 3d 33 36 30 2a |=A1*T...|. B=360*|
|00002aa0| 28 41 41 2d a8 28 41 41 | 29 29 0d 0f 28 21 20 50 |(AA-.(AA|))..(! P|
|00002ab0| 4c 41 4e 28 49 2c 31 29 | 3d 41 30 2b 42 2b 28 41 |LAN(I,1)|=A0+B+(A|
|00002ac0| 33 2a 54 2b 41 32 29 2a | 54 2a 54 0d 0f 32 35 20 |3*T+A2)*|T*T..25 |
|00002ad0| e7 20 50 4c 41 4e 28 49 | 2c 31 29 3e 33 36 30 20 |. PLAN(I|,1)>360 |
|00002ae0| 8c 20 50 4c 41 4e 28 49 | 2c 31 29 3d 50 4c 41 4e |. PLAN(I|,1)=PLAN|
|00002af0| 28 49 2c 31 29 2d 33 36 | 30 3a e5 20 8d 54 72 4f |(I,1)-36|0:. .TrO|
|00002b00| 0d 0f 3c 33 20 e7 20 50 | 4c 41 4e 28 49 2c 31 29 |..<3 . P|LAN(I,1)|
|00002b10| 3c 30 20 8c 20 50 4c 41 | 4e 28 49 2c 31 29 3d 50 |<0 . PLA|N(I,1)=P|
|00002b20| 4c 41 4e 28 49 2c 31 29 | 2b 33 36 30 3a e5 20 8d |LAN(I,1)|+360:. .|
|00002b30| 54 7c 4f 0d 0f 46 2d 20 | 50 4c 41 4e 28 49 2c 32 |T|O..F- |PLAN(I,2|
|00002b40| 29 3d 28 41 31 2a 39 2e | 38 35 36 32 36 33 45 2d |)=(A1*9.|856263E-|
|00002b50| 33 29 2b 28 41 32 2b 41 | 33 29 2f 33 36 35 32 35 |3)+(A2+A|3)/36525|
|00002b60| 0d 0f 50 1c 20 e3 20 4a | 3d 33 20 b8 20 36 3a f3 |..P. . J|=3 . 6:.|
|00002b70| 20 41 30 2c 41 31 2c 41 | 32 2c 41 33 0d 0f 5a 24 | A0,A1,A|2,A3..Z$|
|00002b80| 20 50 4c 41 4e 28 49 2c | 4a 29 3d 28 28 41 33 2a | PLAN(I,|J)=((A3*|
|00002b90| 54 2b 41 32 29 2a 54 2b | 41 31 29 2a 54 2b 41 30 |T+A2)*T+|A1)*T+A0|
|00002ba0| 0d 0f 64 08 20 ed 20 4a | 0d 0f 6e 24 20 f3 20 50 |..d. . J|..n$ . P|
|00002bb0| 4c 41 4e 28 49 2c 37 29 | 2c 50 4c 41 4e 28 49 2c |LAN(I,7)|,PLAN(I,|
|00002bc0| 38 29 2c 50 4c 41 4e 28 | 49 2c 39 29 0d 0f 78 08 |8),PLAN(|I,9)..x.|
|00002bd0| 20 ed 20 49 0d 0f 82 06 | 20 e1 0d 0f 8c 06 20 3a | . I....| ..... :|
|00002be0| 0d 0f 96 0c 20 dd f2 50 | 6c 61 6e 73 0d 0f a0 1a |.... ..P|lans....|
|00002bf0| 20 f2 50 65 6c 65 6d 65 | 6e 74 3a 44 54 3d 30 3a | .Peleme|nt:DT=0:|
|00002c00| 50 41 53 53 3d 30 0d 0f | aa 0d 20 e7 20 49 50 3d |PASS=0..|.. . IP=|
|00002c10| 30 20 e1 0d 0f b4 10 20 | f2 53 75 6e 3a 4d 41 53 |0 ..... |.Sun:MAS|
|00002c20| 3d 4d 41 0d 0f be 14 20 | 52 45 3d 52 53 4e 3a 4c |=MA.... |RE=RSN:L|
|00002c30| 47 3d 4c 53 4e 2b af 0d | 0f c8 0e 20 e3 20 4a 3d |G=LSN+..|... . J=|
|00002c40| 31 20 b8 20 38 0d 0f d2 | 32 20 4d 41 50 28 4a 29 |1 . 8...|2 MAP(J)|
|00002c50| 3d a4 52 41 44 28 50 4c | 41 4e 28 4a 2c 31 29 2d |=.RAD(PL|AN(J,1)-|
|00002c60| 50 4c 41 4e 28 4a 2c 33 | 29 2d 44 54 2a 50 4c 41 |PLAN(J,3|)-DT*PLA|
|00002c70| 4e 28 4a 2c 32 29 29 0d | 0f dc 08 20 ed 20 4a 0d |N(J,2)).|... . J.|
|00002c80| 0f e6 19 20 44 4c 3d 30 | 3a 44 52 3d 30 3a 44 4d |... DL=0|:DR=0:DM|
|00002c90| 4c 3d 30 3a 44 53 3d 30 | 0d 0f f0 14 20 44 4d 3d |L=0:DS=0|.... DM=|
|00002ca0| 30 3a 44 41 3d 30 3a 44 | 48 4c 3d 30 0d 0f fa 06 |0:DA=0:D|HL=0....|
|00002cb0| 20 3a 0d 10 04 0c 20 c8 | 8e 20 49 50 20 ca 0d 10 | :.... .|. IP ...|
|00002cc0| 0e 18 20 c9 20 31 20 20 | 20 20 20 20 20 3a f2 4d |.. . 1  |     :.M|
|00002cd0| 65 72 63 75 72 79 0d 10 | 18 16 20 c9 20 32 20 20 |ercury..|.. . 2  |
|00002ce0| 20 20 20 20 20 3a f2 56 | 65 6e 75 73 0d 10 22 15 |     :.V|enus..".|
|00002cf0| 20 c9 20 33 20 20 20 20 | 20 20 20 3a f2 4d 61 72 | . 3    |   :.Mar|
|00002d00| 73 0d 10 2c 17 20 c9 20 | 34 2c 35 2c 36 2c 37 20 |s..,. . |4,5,6,7 |
|00002d10| 3a f2 4d 61 6a 6f 72 73 | 0d 10 36 06 20 cb 0d 10 |:.Majors|..6. ...|
|00002d20| 40 06 20 3a 0d 10 4a 22 | 20 53 3d 50 4c 41 4e 28 |@. :..J"| S=PLAN(|
|00002d30| 49 50 2c 34 29 2b 44 53 | 3a 4d 41 3d 4d 41 50 28 |IP,4)+DS|:MA=MAP(|
|00002d40| 49 50 29 2b 44 4d 0d 10 | 54 0d 20 f2 41 6e 6f 6d |IP)+DM..|T. .Anom|
|00002d50| 61 6c 79 0d 10 5e 2b 20 | 52 50 3d 28 50 4c 41 4e |aly..^+ |RP=(PLAN|
|00002d60| 28 49 50 2c 37 29 2b 44 | 41 29 2a 28 31 2d 53 2a |(IP,7)+D|A)*(1-S*|
|00002d70| 53 29 2f 28 31 2b 53 2a | 9b 28 4e 55 29 29 0d 10 |S)/(1+S*|.(NU))..|
|00002d80| 68 28 20 4c 50 3d a4 44 | 45 47 28 4e 55 29 2b 50 |h( LP=.D|EG(NU)+P|
|00002d90| 4c 41 4e 28 49 50 2c 33 | 29 2b a4 44 45 47 28 44 |LAN(IP,3|)+.DEG(D|
|00002da0| 4d 4c 2d 44 4d 29 0d 10 | 72 24 20 4c 50 3d a4 52 |ML-DM)..|r$ LP=.R|
|00002db0| 41 44 28 4c 50 29 3a 4f | 4d 3d a4 52 41 44 28 50 |AD(LP):O|M=.RAD(P|
|00002dc0| 4c 41 4e 28 49 50 2c 36 | 29 29 0d 10 7c 21 20 4c |LAN(IP,6|))..|! L|
|00002dd0| 4f 3d 4c 50 2d 4f 4d 3a | 53 4c 4f 3d b5 28 4c 4f |O=LP-OM:|SLO=.(LO|
|00002de0| 29 3a 43 4c 4f 3d 9b 28 | 4c 4f 29 0d 10 86 22 20 |):CLO=.(|LO)..." |
|00002df0| 49 4e 43 3d a4 52 41 44 | 28 50 4c 41 4e 28 49 50 |INC=.RAD|(PLAN(IP|
|00002e00| 2c 35 29 29 3a 52 50 3d | 52 50 2b 44 52 0d 10 90 |,5)):RP=|RP+DR...|
|00002e10| 21 20 53 50 53 49 3d 53 | 4c 4f 2a b5 28 49 4e 43 |! SPSI=S|LO*.(INC|
|00002e20| 29 3a 59 3d 53 4c 4f 2a | 9b 28 49 4e 43 29 0d 10 |):Y=SLO*|.(INC)..|
|00002e30| 9a 23 20 50 53 49 3d a4 | 41 53 4e 28 53 50 53 49 |.# PSI=.|ASN(SPSI|
|00002e40| 29 2b 44 48 4c 3a 53 50 | 53 49 3d b5 28 50 53 49 |)+DHL:SP|SI=.(PSI|
|00002e50| 29 0d 10 a4 1d 20 4c 50 | 44 3d 99 28 59 2f 43 4c |).... LP|D=.(Y/CL|
|00002e60| 4f 29 2b 4f 4d 2b a4 52 | 41 44 28 44 4c 29 0d 10 |O)+OM+.R|AD(DL)..|
|00002e70| ae 18 20 e7 20 43 4c 4f | 3c 30 20 8c 20 4c 50 44 |.. . CLO|<0 . LPD|
|00002e80| 3d 4c 50 44 2b af 0d 10 | b8 1c 20 e7 20 4c 50 44 |=LPD+...|.. . LPD|
|00002e90| 3e 54 50 49 20 8c 20 4c | 50 44 3d 4c 50 44 2d 54 |>TPI . L|PD=LPD-T|
|00002ea0| 50 49 0d 10 c2 1c 20 43 | 50 53 49 3d 9b 28 50 53 |PI.... C|PSI=.(PS|
|00002eb0| 49 29 3a 52 50 44 3d 52 | 50 2a 43 50 53 49 0d 10 |I):RPD=R|P*CPSI..|
|00002ec0| cc 1a 20 4c 4c 3d 4c 50 | 44 2d 4c 47 3a 50 41 53 |.. LL=LP|D-LG:PAS|
|00002ed0| 53 3d 50 41 53 53 2b 31 | 0d 10 d6 27 20 52 48 4f |S=PASS+1|...' RHO|
|00002ee0| 3d 52 45 2a 52 45 2b 52 | 50 2a 52 50 2d 32 2a 52 |=RE*RE+R|P*RP-2*R|
|00002ef0| 45 2a 52 50 2a 43 50 53 | 49 2a 9b 28 4c 4c 29 0d |E*RP*CPS|I*.(LL).|
|00002f00| 10 e0 20 20 52 48 4f 3d | b6 28 52 48 4f 29 3a 44 |..  RHO=|.(RHO):D|
|00002f10| 54 3d 52 48 4f 2a 35 2e | 37 37 35 35 45 2d 33 0d |T=RHO*5.|7755E-3.|
|00002f20| 10 ea 31 20 e7 20 50 41 | 53 53 3d 31 20 8c 20 4c |..1 . PA|SS=1 . L|
|00002f30| 50 44 30 3d 4c 50 44 3a | 50 53 49 30 3d 50 53 49 |PD0=LPD:|PSI0=PSI|
|00002f40| 3a 52 48 4f 30 3d 52 48 | 4f 3a 52 50 30 3d 52 50 |:RHO0=RH|O:RP0=RP|
|00002f50| 0d 10 f4 14 20 e7 20 50 | 41 53 53 3c 32 20 8c 20 |.... . P|ASS<2 . |
|00002f60| 8d 64 48 4f 0d 10 fe 18 | 20 53 4c 4c 3d b5 28 4c |.dHO....| SLL=.(L|
|00002f70| 4c 29 3a 43 4c 4c 3d 9b | 28 4c 4c 29 0d 11 08 12 |L):CLL=.|(LL)....|
|00002f80| 20 e7 20 49 50 3c 33 20 | 8c 20 8d 54 66 51 0d 11 | . IP<3 |. .TfQ..|
|00002f90| 12 23 20 4c 41 4d 3d 99 | 28 52 45 2a 53 4c 4c 2f |.# LAM=.|(RE*SLL/|
|00002fa0| 28 52 50 44 2d 52 45 2a | 43 4c 4c 29 29 2b 4c 50 |(RPD-RE*|CLL))+LP|
|00002fb0| 44 0d 11 1c 0b 20 e5 20 | 8d 54 70 51 0d 11 26 28 |D.... . |.TpQ..&(|
|00002fc0| 20 4c 41 4d 3d 99 28 2d | 31 2a 52 50 44 2a 53 4c | LAM=.(-|1*RPD*SL|
|00002fd0| 4c 2f 28 52 45 2d 52 50 | 44 2a 43 4c 4c 29 29 2b |L/(RE-RP|D*CLL))+|
|00002fe0| 4c 47 2b af 0d 11 30 21 | 20 e7 20 4c 41 4d 3c 30 |LG+...0!| . LAM<0|
|00002ff0| 20 8c 20 4c 41 4d 3d 4c | 41 4d 2b 54 50 49 3a e5 | . LAM=L|AM+TPI:.|
|00003000| 20 8d 54 70 51 0d 11 3a | 23 20 e7 20 4c 41 4d 3e | .TpQ..:|# . LAM>|
|00003010| 54 50 49 20 8c 20 4c 41 | 4d 3d 4c 41 4d 2d 54 50 |TPI . LA|M=LAM-TP|
|00003020| 49 3a e5 20 8d 54 7a 51 | 0d 11 44 2d 20 42 45 54 |I:. .TzQ|..D- BET|
|00003030| 3d 99 28 52 50 44 2a 53 | 50 53 49 2a b5 28 4c 41 |=.(RPD*S|PSI*.(LA|
|00003040| 4d 2d 4c 50 44 29 2f 28 | 43 50 53 49 2a 52 45 2a |M-LPD)/(|CPSI*RE*|
|00003050| 53 4c 4c 29 29 0d 11 4e | 06 20 e1 0d 11 58 06 20 |SLL))..N|. ...X. |
|00003060| 3a 0d 11 62 0e 20 dd f2 | 4d 65 72 63 75 72 79 0d |:..b. ..|Mercury.|
|00003070| 11 6c 9a 20 44 4c 3d 32 | 2e 30 34 45 2d 33 2a 9b |.l. DL=2|.04E-3*.|
|00003080| 28 35 2a 4d 41 50 28 32 | 29 2d 32 2a 4d 41 50 28 |(5*MAP(2|)-2*MAP(|
|00003090| 31 29 2b 32 2e 31 33 32 | 38 45 2d 31 29 2b 31 2e |1)+2.132|8E-1)+1.|
|000030a0| 30 33 45 2d 33 2a 9b 28 | 32 2a 4d 41 50 28 32 29 |03E-3*.(|2*MAP(2)|
|000030b0| 2d 4d 41 50 28 31 29 2d | 32 2e 38 30 34 36 29 2b |-MAP(1)-|2.8046)+|
|000030c0| 39 2e 31 45 2d 34 2a 9b | 28 32 2a 4d 41 50 28 34 |9.1E-4*.|(2*MAP(4|
|000030d0| 29 2d 4d 41 50 28 31 29 | 2d 36 2e 34 35 38 32 45 |)-MAP(1)|-6.4582E|
|000030e0| 2d 31 29 2b 37 2e 38 45 | 2d 34 2a 9b 28 35 2a 4d |-1)+7.8E|-4*.(5*M|
|000030f0| 41 50 28 32 29 2d 33 2a | 4d 41 50 28 31 29 2b 31 |AP(2)-3*|MAP(1)+1|
|00003100| 2e 37 36 39 32 45 2d 31 | 29 0d 11 76 9e 20 44 52 |.7692E-1|)..v. DR|
|00003110| 3d 37 2e 35 32 35 45 2d | 36 2a 9b 28 32 2a 4d 41 |=7.525E-|6*.(2*MA|
|00003120| 50 28 34 29 2d 4d 41 50 | 28 31 29 2b 39 2e 32 35 |P(4)-MAP|(1)+9.25|
|00003130| 32 35 31 45 2d 31 29 2b | 36 2e 38 30 32 45 2d 36 |251E-1)+|6.802E-6|
|00003140| 2a 9b 28 35 2a 4d 41 50 | 28 32 29 2d 33 2a 4d 41 |*.(5*MAP|(2)-3*MA|
|00003150| 50 28 31 29 2d 34 2e 35 | 33 36 34 32 29 2b 35 2e |P(1)-4.5|3642)+5.|
|00003160| 34 35 37 45 2d 36 2a 9b | 28 32 2a 4d 41 50 28 32 |457E-6*.|(2*MAP(2|
|00003170| 29 2d 32 2a 4d 41 50 28 | 31 29 2d 31 2e 32 34 32 |)-2*MAP(|1)-1.242|
|00003180| 34 36 29 2b 33 2e 35 36 | 39 45 2d 36 2a 9b 28 35 |46)+3.56|9E-6*.(5|
|00003190| 2a 4d 41 50 28 32 29 2d | 4d 41 50 28 31 29 2d 31 |*MAP(2)-|MAP(1)-1|
|000031a0| 2e 33 35 36 39 39 29 0d | 11 80 06 20 e1 0d 11 8a |.35699).|... ....|
|000031b0| 06 20 3a 0d 11 94 0c 20 | dd f2 56 65 6e 75 73 0d |. :.... |..Venus.|
|000031c0| 11 9e 22 20 44 4d 4c 3d | 37 2e 37 45 2d 34 2a b5 |.." DML=|7.7E-4*.|
|000031d0| 28 34 2e 31 34 30 36 2b | 54 2a 32 2e 36 32 32 37 |(4.1406+|T*2.6227|
|000031e0| 29 0d 11 a8 19 20 44 4d | 4c 3d a4 52 41 44 28 44 |).... DM|L=.RAD(D|
|000031f0| 4d 4c 29 3a 44 4d 3d 44 | 4d 4c 0d 11 b2 a7 20 44 |ML):DM=D|ML.... D|
|00003200| 4c 3d 33 2e 31 33 45 2d | 33 2a 9b 28 32 2a 4d 41 |L=3.13E-|3*.(2*MA|
|00003210| 53 2d 32 2a 4d 41 50 28 | 32 29 2d 32 2e 35 38 37 |S-2*MAP(|2)-2.587|
|00003220| 29 2b 31 2e 39 38 45 2d | 33 2a 9b 28 33 2a 4d 41 |)+1.98E-|3*.(3*MA|
|00003230| 53 2d 33 2a 4d 41 50 28 | 32 29 2b 34 2e 34 37 36 |S-3*MAP(|2)+4.476|
|00003240| 38 45 2d 32 29 2b 31 2e | 33 36 45 2d 33 2a 9b 28 |8E-2)+1.|36E-3*.(|
|00003250| 4d 41 53 2d 4d 41 50 28 | 32 29 2d 32 2e 30 37 38 |MAS-MAP(|2)-2.078|
|00003260| 38 29 2b 39 2e 36 45 2d | 34 2a 9b 28 33 2a 4d 41 |8)+9.6E-|4*.(3*MA|
|00003270| 53 2d 32 2a 4d 41 50 28 | 32 29 2d 32 2e 33 32 37 |S-2*MAP(|2)-2.327|
|00003280| 31 29 2b 38 2e 32 45 2d | 34 2a 9b 28 4d 41 50 28 |1)+8.2E-|4*.(MAP(|
|00003290| 34 29 2d 4d 41 50 28 32 | 29 2d 33 2e 36 33 31 38 |4)-MAP(2|)-3.6318|
|000032a0| 29 0d 11 bc d8 20 44 52 | 3d 32 2e 32 35 30 31 45 |).... DR|=2.2501E|
|000032b0| 2d 35 2a 9b 28 32 2a 4d | 41 53 2d 32 2a 4d 41 50 |-5*.(2*M|AS-2*MAP|
|000032c0| 28 32 29 2d 31 2e 30 31 | 35 39 32 29 2b 31 2e 39 |(2)-1.01|592)+1.9|
|000032d0| 30 34 35 45 2d 35 2a 9b | 28 33 2a 4d 41 53 2d 33 |045E-5*.|(3*MAS-3|
|000032e0| 2a 4d 41 50 28 32 29 2b | 31 2e 36 31 35 37 37 29 |*MAP(2)+|1.61577)|
|000032f0| 2b 36 2e 38 38 37 45 2d | 36 2a 9b 28 4d 41 50 28 |+6.887E-|6*.(MAP(|
|00003300| 34 29 2d 4d 41 50 28 32 | 29 2d 32 2e 30 36 31 30 |4)-MAP(2|)-2.0610|
|00003310| 36 29 2b 35 2e 31 37 32 | 45 2d 36 2a 9b 28 4d 41 |6)+5.172|E-6*.(MA|
|00003320| 53 2d 4d 41 50 28 32 29 | 2d 35 2e 30 38 30 36 35 |S-MAP(2)|-5.08065|
|00003330| 45 2d 31 29 2b 33 2e 36 | 32 45 2d 36 2a 9b 28 35 |E-1)+3.6|2E-6*.(5|
|00003340| 2a 4d 41 53 2d 34 2a 4d | 41 50 28 32 29 2d 31 2e |*MAS-4*M|AP(2)-1.|
|00003350| 38 31 38 37 37 29 2b 33 | 2e 32 38 33 45 2d 36 2a |81877)+3|.283E-6*|
|00003360| 9b 28 34 2a 4d 41 53 2d | 34 2a 4d 41 50 28 32 29 |.(4*MAS-|4*MAP(2)|
|00003370| 2b 31 2e 31 30 38 35 31 | 29 0d 11 c6 33 20 44 52 |+1.10851|)...3 DR|
|00003380| 3d 44 52 2b 33 2e 30 37 | 34 45 2d 36 2a 9b 28 32 |=DR+3.07|4E-6*.(2|
|00003390| 2a 4d 41 50 28 34 29 2d | 32 2a 4d 41 50 28 32 29 |*MAP(4)-|2*MAP(2)|
|000033a0| 2d 39 2e 36 32 38 34 36 | 45 2d 31 29 0d 11 d0 06 |-9.62846|E-1)....|
|000033b0| 20 e1 0d 11 da 06 20 3a | 0d 11 e4 0b 20 dd f2 4d | ..... :|.... ..M|
|000033c0| 61 72 73 0d 11 ee 1e 20 | 41 3d 33 2a 4d 41 50 28 |ars.... |A=3*MAP(|
|000033d0| 34 29 2d 38 2a 4d 41 50 | 28 33 29 2b 34 2a 4d 41 |4)-8*MAP|(3)+4*MA|
|000033e0| 53 0d 11 f8 14 20 53 41 | 3d b5 28 41 29 3a 43 41 |S.... SA|=.(A):CA|
|000033f0| 3d 9b 28 41 29 0d 12 02 | 24 20 44 4d 4c 3d 2d 31 |=.(A)...|$ DML=-1|
|00003400| 2a 28 31 2e 31 33 33 45 | 2d 32 2a 53 41 2b 39 2e |*(1.133E|-2*SA+9.|
|00003410| 33 33 45 2d 33 2a 43 41 | 29 0d 12 0c 19 20 44 4d |33E-3*CA|).... DM|
|00003420| 4c 3d a4 52 41 44 28 44 | 4d 4c 29 3a 44 4d 3d 44 |L=.RAD(D|ML):DM=D|
|00003430| 4d 4c 0d 12 16 d3 20 44 | 4c 3d 37 2e 30 35 45 2d |ML.... D|L=7.05E-|
|00003440| 33 2a 9b 28 4d 41 50 28 | 34 29 2d 4d 41 50 28 33 |3*.(MAP(|4)-MAP(3|
|00003450| 29 2d 38 2e 35 34 34 38 | 45 2d 31 29 2b 36 2e 30 |)-8.5448|E-1)+6.0|
|00003460| 37 45 2d 33 2a 9b 28 32 | 2a 4d 41 50 28 34 29 2d |7E-3*.(2|*MAP(4)-|
|00003470| 4d 41 50 28 33 29 2d 33 | 2e 32 38 37 33 29 2b 34 |MAP(3)-3|.2873)+4|
|00003480| 2e 34 35 45 2d 33 2a 9b | 28 32 2a 4d 41 50 28 34 |.45E-3*.|(2*MAP(4|
|00003490| 29 2d 32 2a 4d 41 50 28 | 33 29 2d 33 2e 33 34 39 |)-2*MAP(|3)-3.349|
|000034a0| 32 29 2b 33 2e 38 38 45 | 2d 33 2a 9b 28 4d 41 53 |2)+3.88E|-3*.(MAS|
|000034b0| 2d 32 2a 4d 41 50 28 33 | 29 2b 33 2e 35 37 37 31 |-2*MAP(3|)+3.5771|
|000034c0| 45 2d 31 29 2b 32 2e 33 | 38 45 2d 33 2a 9b 28 4d |E-1)+2.3|8E-3*.(M|
|000034d0| 41 53 2d 4d 41 50 28 33 | 29 2b 36 2e 31 32 35 36 |AS-MAP(3|)+6.1256|
|000034e0| 45 2d 31 29 2b 32 2e 30 | 34 45 2d 33 2a 9b 28 32 |E-1)+2.0|4E-3*.(2|
|000034f0| 2a 4d 41 53 2d 33 2a 4d | 41 50 28 33 29 2b 32 2e |*MAS-3*M|AP(3)+2.|
|00003500| 37 36 38 38 29 0d 12 20 | 69 20 44 4c 3d 44 4c 2b |7688).. |i DL=DL+|
|00003510| 31 2e 37 37 45 2d 33 2a | 9b 28 33 2a 4d 41 50 28 |1.77E-3*|.(3*MAP(|
|00003520| 33 29 2d 4d 41 50 28 32 | 29 2d 31 2e 30 30 35 33 |3)-MAP(2|)-1.0053|
|00003530| 29 2b 31 2e 33 36 45 2d | 33 2a 9b 28 32 2a 4d 41 |)+1.36E-|3*.(2*MA|
|00003540| 53 2d 34 2a 4d 41 50 28 | 33 29 2b 32 2e 36 38 39 |S-4*MAP(|3)+2.689|
|00003550| 34 29 2b 31 2e 30 34 45 | 2d 33 2a 9b 28 4d 41 50 |4)+1.04E|-3*.(MAP|
|00003560| 28 34 29 2b 33 2e 30 37 | 34 39 45 2d 31 29 0d 12 |(4)+3.07|49E-1)..|
|00003570| 2a c0 20 44 52 3d 35 2e | 33 32 32 37 45 2d 35 2a |*. DR=5.|3227E-5*|
|00003580| 9b 28 4d 41 50 28 34 29 | 2d 4d 41 50 28 33 29 2b |.(MAP(4)|-MAP(3)+|
|00003590| 37 2e 31 37 38 36 34 45 | 2d 31 29 2b 35 2e 30 39 |7.17864E|-1)+5.09|
|000035a0| 38 39 45 2d 35 2a 9b 28 | 32 2a 4d 41 50 28 34 29 |89E-5*.(|2*MAP(4)|
|000035b0| 2d 32 2a 4d 41 50 28 33 | 29 2d 31 2e 37 37 39 39 |-2*MAP(3|)-1.7799|
|000035c0| 37 29 2b 33 2e 38 32 37 | 38 45 2d 35 2a 9b 28 32 |7)+3.827|8E-5*.(2|
|000035d0| 2a 4d 41 50 28 34 29 2d | 4d 41 50 28 33 29 2d 31 |*MAP(4)-|MAP(3)-1|
|000035e0| 2e 37 31 36 31 37 29 2b | 31 2e 35 39 39 36 45 2d |.71617)+|1.5996E-|
|000035f0| 35 2a 9b 28 4d 41 53 2d | 4d 41 50 28 33 29 2d 39 |5*.(MAS-|MAP(3)-9|
|00003600| 2e 36 39 36 31 38 45 2d | 31 29 2b 31 2e 34 37 36 |.69618E-|1)+1.476|
|00003610| 34 45 2d 35 2a 9b 28 32 | 2a 4d 41 53 2d 33 2a 4d |4E-5*.(2|*MAS-3*M|
|00003620| 41 50 28 33 29 2b 31 2e | 31 39 37 36 38 29 0d 12 |AP(3)+1.|19768)..|
|00003630| 34 c2 20 44 52 3d 44 52 | 2b 38 2e 39 36 36 45 2d |4. DR=DR|+8.966E-|
|00003640| 36 2a 9b 28 4d 41 50 28 | 34 29 2d 32 2a 4d 41 50 |6*.(MAP(|4)-2*MAP|
|00003650| 28 33 29 2b 37 2e 36 31 | 32 32 35 45 2d 31 29 2b |(3)+7.61|225E-1)+|
|00003660| 37 2e 39 31 34 45 2d 36 | 2a 9b 28 33 2a 4d 41 50 |7.914E-6|*.(3*MAP|
|00003670| 28 34 29 2d 32 2a 4d 41 | 50 28 33 29 2d 32 2e 34 |(4)-2*MA|P(3)-2.4|
|00003680| 33 38 38 37 29 2b 37 2e | 30 30 34 45 2d 36 2a 9b |3887)+7.|004E-6*.|
|00003690| 28 32 2a 4d 41 50 28 34 | 29 2d 33 2a 4d 41 50 28 |(2*MAP(4|)-3*MAP(|
|000036a0| 33 29 2d 31 2e 37 39 35 | 37 33 29 2b 36 2e 36 32 |3)-1.795|73)+6.62|
|000036b0| 45 2d 36 2a 9b 28 4d 41 | 53 2d 32 2a 4d 41 50 28 |E-6*.(MA|S-2*MAP(|
|000036c0| 33 29 2b 31 2e 39 37 35 | 37 35 29 2b 34 2e 39 33 |3)+1.975|75)+4.93|
|000036d0| 45 2d 36 2a 9b 28 33 2a | 4d 41 50 28 34 29 2d 33 |E-6*.(3*|MAP(4)-3|
|000036e0| 2a 4d 41 50 28 33 29 2d | 31 2e 33 33 30 36 39 29 |*MAP(3)-|1.33069)|
|000036f0| 0d 12 3e 74 20 44 52 3d | 44 52 2b 34 2e 36 39 33 |..>t DR=|DR+4.693|
|00003700| 45 2d 36 2a 9b 28 33 2a | 4d 41 53 2d 35 2a 4d 41 |E-6*.(3*|MAS-5*MA|
|00003710| 50 28 33 29 2b 33 2e 33 | 32 36 36 35 29 2b 34 2e |P(3)+3.3|2665)+4.|
|00003720| 35 37 31 45 2d 36 2a 9b | 28 32 2a 4d 41 53 2d 34 |571E-6*.|(2*MAS-4|
|00003730| 2a 4d 41 50 28 33 29 2b | 34 2e 32 37 30 38 36 29 |*MAP(3)+|4.27086)|
|00003740| 2b 34 2e 34 30 39 45 2d | 36 2a 9b 28 33 2a 4d 41 |+4.409E-|6*.(3*MA|
|00003750| 50 28 34 29 2d 4d 41 50 | 28 33 29 2d 32 2e 30 32 |P(4)-MAP|(3)-2.02|
|00003760| 31 35 38 29 0d 12 48 06 | 20 e1 0d 12 52 06 20 3a |158)..H.| ...R. :|
|00003770| 0d 12 5c 1d 20 f4 20 20 | 2e 2e 2e 2e 2e 2e 4a 75 |..\. .  |......Ju|
|00003780| 70 69 74 65 72 2c 20 53 | 61 74 75 72 6e 0d 12 66 |piter, S|aturn..f|
|00003790| 22 20 f4 20 20 2e 2e 2e | 2e 2e 2e 2e 55 72 61 6e |" .  ...|....Uran|
|000037a0| 75 73 2c 20 61 6e 64 20 | 4e 65 70 74 75 6e 65 0d |us, and |Neptune.|
|000037b0| 12 70 06 20 3a 0d 12 7a | 0d 20 dd f2 4d 61 6a 6f |.p. :..z|. ..Majo|
|000037c0| 72 73 0d 12 84 0f 20 4a | 31 3d 54 2f 35 2b 30 2e |rs.... J|1=T/5+0.|
|000037d0| 31 0d 12 8e 21 20 4a 32 | 3d a4 55 4e 57 28 34 2e |1...! J2|=.UNW(4.|
|000037e0| 31 34 34 37 33 2b 35 2e | 32 39 36 39 31 45 31 2a |14473+5.|29691E1*|
|000037f0| 54 29 0d 12 98 23 20 4a | 33 3d a4 55 4e 57 28 34 |T)...# J|3=.UNW(4|
|00003800| 2e 36 34 31 31 31 38 2b | 32 2e 31 33 32 39 39 31 |.641118+|2.132991|
|00003810| 45 31 2a 54 29 0d 12 a2 | 21 20 4a 34 3d a4 55 4e |E1*T)...|! J4=.UN|
|00003820| 57 28 34 2e 32 35 30 31 | 37 37 2b 37 2e 34 37 38 |W(4.2501|77+7.478|
|00003830| 31 37 32 2a 54 29 0d 12 | ac 23 20 4a 35 3d 35 2a |172*T)..|.# J5=5*|
|00003840| 4a 33 2d 32 2a 4a 32 3a | 4a 36 3d 32 2a 4a 32 2d |J3-2*J2:|J6=2*J2-|
|00003850| 36 2a 4a 33 2b 33 2a 4a | 34 0d 12 b6 06 20 3a 0d |6*J3+3*J|4.... :.|
|00003860| 12 c0 0c 20 c8 8e 20 49 | 50 20 ca 0d 12 ca 0f 20 |... .. I|P ..... |
|00003870| c9 20 31 2c 32 2c 33 20 | 3a e1 0d 12 d4 15 20 c9 |. 1,2,3 |:..... .|
|00003880| 20 34 2c 35 20 20 20 3a | f2 47 69 61 6e 74 73 0d | 4,5   :|.Giants.|
|00003890| 12 de 15 20 c9 20 36 2c | 37 20 20 20 3a f2 4f 75 |... . 6,|7   :.Ou|
|000038a0| 74 65 72 73 0d 12 e8 0f | 20 c9 20 38 20 20 20 20 |ters....| . 8    |
|000038b0| 20 3a e1 0d 12 f2 06 20 | cb 0d 12 fc 06 20 e1 0d | :..... |..... ..|
|000038c0| 13 06 06 20 3a 0d 13 10 | 0d 20 dd f2 47 69 61 6e |... :...|. ..Gian|
|000038d0| 74 73 0d 13 1a 21 20 4a | 37 3d 4a 33 2d 4a 32 3a |ts...! J|7=J3-J2:|
|000038e0| 53 4a 33 3d b5 28 4a 33 | 29 3a 43 4a 33 3d 9b 28 |SJ3=.(J3|):CJ3=.(|
|000038f0| 4a 33 29 0d 13 24 1e 20 | 53 32 4a 33 3d b5 28 32 |J3)..$. |S2J3=.(2|
|00003900| 2a 4a 33 29 3a 43 32 4a | 33 3d 9b 28 32 2a 4a 33 |*J3):C2J|3=.(2*J3|
|00003910| 29 0d 13 2e 18 20 53 4a | 35 3d b5 28 4a 35 29 3a |).... SJ|5=.(J5):|
|00003920| 43 4a 35 3d 9b 28 4a 35 | 29 0d 13 38 1b 20 53 32 |CJ5=.(J5|)..8. S2|
|00003930| 4a 35 3d b5 28 32 2a 4a | 35 29 3a 53 4a 36 3d b5 |J5=.(2*J|5):SJ6=.|
|00003940| 28 4a 36 29 0d 13 42 18 | 20 53 4a 37 3d b5 28 4a |(J6)..B.| SJ7=.(J|
|00003950| 37 29 3a 43 4a 37 3d 9b | 28 4a 37 29 0d 13 4c 1e |7):CJ7=.|(J7)..L.|
|00003960| 20 53 32 4a 37 3d b5 28 | 32 2a 4a 37 29 3a 43 32 | S2J7=.(|2*J7):C2|
|00003970| 4a 37 3d 9b 28 32 2a 4a | 37 29 0d 13 56 1e 20 53 |J7=.(2*J|7)..V. S|
|00003980| 33 4a 37 3d b5 28 33 2a | 4a 37 29 3a 43 33 4a 37 |3J7=.(3*|J7):C3J7|
|00003990| 3d 9b 28 33 2a 4a 37 29 | 0d 13 60 1e 20 53 34 4a |=.(3*J7)|..`. S4J|
|000039a0| 37 3d b5 28 34 2a 4a 37 | 29 3a 43 34 4a 37 3d 9b |7=.(4*J7|):C4J7=.|
|000039b0| 28 34 2a 4a 37 29 0d 13 | 6a 11 20 43 35 4a 37 3d |(4*J7)..|j. C5J7=|
|000039c0| 9b 28 35 2a 4a 37 29 0d | 13 74 1e 20 e7 20 49 50 |.(5*J7).|.t. . IP|
|000039d0| 3d 35 20 f2 53 61 74 75 | 72 6e 20 8b 20 f2 4a 75 |=5 .Satu|rn . .Ju|
|000039e0| 70 69 74 65 72 0d 13 7e | 06 20 e1 0d 13 88 06 20 |piter..~|. ..... |
|000039f0| 3a 0d 13 92 0e 20 dd f2 | 4a 75 70 69 74 65 72 0d |:.... ..|Jupiter.|
|00003a00| 13 9c de 20 44 4d 4c 3d | 28 33 2e 33 31 33 36 34 |... DML=|(3.31364|
|00003a10| 45 2d 31 2d 28 31 2e 30 | 32 38 31 45 2d 32 2b 34 |E-1-(1.0|281E-2+4|
|00003a20| 2e 36 39 32 45 2d 33 2a | 4a 31 29 2a 4a 31 29 2a |.692E-3*|J1)*J1)*|
|00003a30| 53 4a 35 2b 28 33 2e 32 | 32 38 45 2d 33 2d 28 36 |SJ5+(3.2|28E-3-(6|
|00003a40| 2e 34 34 33 36 45 2d 32 | 2d 32 2e 30 37 35 45 2d |.4436E-2|-2.075E-|
|00003a50| 33 2a 4a 31 29 2a 4a 31 | 29 2a 43 4a 35 2d 28 33 |3*J1)*J1|)*CJ5-(3|
|00003a60| 2e 30 38 33 45 2d 33 2b | 28 32 2e 37 35 45 2d 34 |.083E-3+|(2.75E-4|
|00003a70| 2d 34 2e 38 39 45 2d 34 | 2a 4a 31 29 2a 4a 31 29 |-4.89E-4|*J1)*J1)|
|00003a80| 2a 53 32 4a 35 2b 32 2e | 34 37 32 45 2d 33 2a 53 |*S2J5+2.|472E-3*S|
|00003a90| 4a 36 2b 31 2e 33 36 31 | 39 45 2d 32 2a 53 4a 37 |J6+1.361|9E-2*SJ7|
|00003aa0| 2b 31 2e 38 34 37 32 45 | 2d 32 2a 53 32 4a 37 2b |+1.8472E|-2*S2J7+|
|00003ab0| 36 2e 37 31 37 45 2d 33 | 2a 53 33 4a 37 2b 32 2e |6.717E-3|*S3J7+2.|
|00003ac0| 37 37 35 45 2d 33 2a 53 | 34 4a 37 2b 36 2e 34 31 |775E-3*S|4J7+6.41|
|00003ad0| 37 45 2d 33 2a 53 32 4a | 37 2a 53 4a 33 0d 13 a6 |7E-3*S2J|7*SJ3...|
|00003ae0| cd 20 44 4d 4c 3d 44 4d | 4c 2b 28 37 2e 32 37 35 |. DML=DM|L+(7.275|
|00003af0| 45 2d 33 2d 31 2e 32 35 | 33 45 2d 33 2a 4a 31 29 |E-3-1.25|3E-3*J1)|
|00003b00| 2a 53 4a 37 2a 53 4a 33 | 2b 32 2e 34 33 39 45 2d |*SJ7*SJ3|+2.439E-|
|00003b10| 33 2a 53 33 4a 37 2a 53 | 4a 33 2d 28 33 2e 35 36 |3*S3J7*S|J3-(3.56|
|00003b20| 38 31 45 2d 32 2b 31 2e | 32 30 38 45 2d 33 2a 4a |81E-2+1.|208E-3*J|
|00003b30| 31 29 2a 53 4a 37 2a 43 | 4a 33 2d 33 2e 37 36 37 |1)*SJ7*C|J3-3.767|
|00003b40| 45 2d 33 2a 43 32 4a 37 | 2a 53 4a 33 2d 28 33 2e |E-3*C2J7|*SJ3-(3.|
|00003b50| 33 38 33 39 45 2d 32 2b | 31 2e 31 32 35 45 2d 33 |3839E-2+|1.125E-3|
|00003b60| 2a 4a 31 29 2a 43 4a 37 | 2a 53 4a 33 2d 34 2e 32 |*J1)*CJ7|*SJ3-4.2|
|00003b70| 36 31 45 2d 33 2a 53 32 | 4a 37 2a 43 4a 33 2b 28 |61E-3*S2|J7*CJ3+(|
|00003b80| 31 2e 31 36 31 45 2d 33 | 2a 4a 31 2d 36 2e 33 33 |1.161E-3|*J1-6.33|
|00003b90| 33 45 2d 33 29 2a 43 4a | 37 2a 43 4a 33 2b 32 2e |3E-3)*CJ|7*CJ3+2.|
|00003ba0| 31 37 38 45 2d 33 2a 43 | 4a 33 0d 13 b0 7a 20 44 |178E-3*C|J3...z D|
|00003bb0| 4d 4c 3d 44 4d 4c 2d 36 | 2e 36 37 35 45 2d 33 2a |ML=DML-6|.675E-3*|
|00003bc0| 43 32 4a 37 2a 43 4a 33 | 2d 32 2e 36 36 34 45 2d |C2J7*CJ3|-2.664E-|
|00003bd0| 33 2a 43 33 4a 37 2a 43 | 4a 33 2d 32 2e 35 37 32 |3*C3J7*C|J3-2.572|
|00003be0| 45 2d 33 2a 53 4a 37 2a | 53 32 4a 33 2d 33 2e 35 |E-3*SJ7*|S2J3-3.5|
|00003bf0| 36 37 45 2d 33 2a 53 32 | 4a 37 2a 53 32 4a 33 2b |67E-3*S2|J7*S2J3+|
|00003c00| 32 2e 30 39 34 45 2d 33 | 2a 43 4a 37 2a 43 32 4a |2.094E-3|*CJ7*C2J|
|00003c10| 33 2b 33 2e 33 34 32 45 | 2d 33 2a 43 32 4a 37 2a |3+3.342E|-3*C2J7*|
|00003c20| 43 32 4a 33 0d 13 ba 12 | 20 44 4d 4c 3d a4 52 41 |C2J3....| DML=.RA|
|00003c30| 44 28 44 4d 4c 29 0d 13 | c4 e5 20 44 53 3d 28 33 |D(DML)..|.. DS=(3|
|00003c40| 36 30 36 2b 28 31 33 30 | 2d 34 33 2a 4a 31 29 2a |606+(130|-43*J1)*|
|00003c50| 4a 31 29 2a 53 4a 35 2b | 28 31 32 38 39 2d 35 38 |J1)*SJ5+|(1289-58|
|00003c60| 30 2a 4a 31 29 2a 43 4a | 35 2d 36 37 36 34 2a 53 |0*J1)*CJ|5-6764*S|
|00003c70| 4a 37 2a 53 4a 33 2d 31 | 31 31 30 2a 53 32 4a 37 |J7*SJ3-1|110*S2J7|
|00003c80| 2a 53 4a 33 2d 32 32 34 | 2a 53 33 4a 37 2a 53 4a |*SJ3-224|*S3J7*SJ|
|00003c90| 33 2d 32 30 34 2a 53 4a | 33 2b 28 31 32 38 34 2b |3-204*SJ|3+(1284+|
|00003ca0| 31 31 36 2a 4a 31 29 2a | 43 4a 37 2a 53 4a 33 2b |116*J1)*|CJ7*SJ3+|
|00003cb0| 31 38 38 2a 43 32 4a 37 | 2a 53 4a 33 2b 28 31 34 |188*C2J7|*SJ3+(14|
|00003cc0| 36 30 2b 31 33 30 2a 4a | 31 29 2a 53 4a 37 2a 43 |60+130*J|1)*SJ7*C|
|00003cd0| 4a 33 2b 32 32 34 2a 53 | 32 4a 37 2a 43 4a 33 2d |J3+224*S|2J7*CJ3-|
|00003ce0| 38 31 37 2a 43 4a 33 2b | 36 30 37 34 2a 43 4a 33 |817*CJ3+|6074*CJ3|
|00003cf0| 2a 43 4a 37 2b 39 39 32 | 2a 43 32 4a 37 2a 43 4a |*CJ7+992|*C2J7*CJ|
|00003d00| 33 2b 35 30 38 2a 43 33 | 4a 37 2a 43 4a 33 2b 32 |3+508*C3|J7*CJ3+2|
|00003d10| 33 30 2a 43 34 4a 37 2a | 43 4a 33 0d 13 ce ca 20 |30*C4J7*|CJ3.... |
|00003d20| 44 53 3d 44 53 2b 31 30 | 38 2a 43 35 4a 37 2a 43 |DS=DS+10|8*C5J7*C|
|00003d30| 4a 33 2d 28 39 35 36 2b | 37 33 2a 4a 31 29 2a 53 |J3-(956+|73*J1)*S|
|00003d40| 4a 37 2a 53 32 4a 33 2b | 34 34 38 2a 53 32 4a 37 |J7*S2J3+|448*S2J7|
|00003d50| 2a 53 32 4a 33 2b 31 33 | 37 2a 53 33 4a 37 2a 53 |*S2J3+13|7*S3J7*S|
|00003d60| 32 4a 33 2b 28 31 30 38 | 2a 4a 31 2d 39 39 37 29 |2J3+(108|*J1-997)|
|00003d70| 2a 43 4a 37 2a 53 32 4a | 33 2b 34 38 30 2a 43 32 |*CJ7*S2J|3+480*C2|
|00003d80| 4a 37 2a 53 32 4a 33 2b | 31 34 38 2a 43 33 4a 37 |J7*S2J3+|148*C3J7|
|00003d90| 2a 53 32 4a 33 2b 28 39 | 39 2a 4a 31 2d 39 35 36 |*S2J3+(9|9*J1-956|
|00003da0| 29 2a 53 4a 37 2a 43 32 | 4a 33 2b 34 39 30 2a 53 |)*SJ7*C2|J3+490*S|
|00003db0| 32 4a 37 2a 43 32 4a 33 | 2b 31 35 38 2a 53 33 4a |2J7*C2J3|+158*S3J|
|00003dc0| 37 2a 43 32 4a 33 2b 31 | 37 39 2a 43 32 4a 33 2b |7*C2J3+1|79*C2J3+|
|00003dd0| 28 31 30 32 34 2b 37 35 | 2a 4a 31 29 2a 43 4a 37 |(1024+75|*J1)*CJ7|
|00003de0| 2a 43 32 4a 33 0d 13 d8 | 26 20 44 53 3d 44 53 2d |*C2J3...|& DS=DS-|
|00003df0| 34 33 37 2a 43 32 4a 37 | 2a 43 32 4a 33 2d 31 33 |437*C2J7|*C2J3-13|
|00003e00| 32 2a 43 33 4a 37 2a 43 | 32 4a 33 0d 13 e2 0f 20 |2*C3J7*C|2J3.... |
|00003e10| 44 53 3d 44 53 2a 31 45 | 2d 37 0d 13 ec cf 20 44 |DS=DS*1E|-7.... D|
|00003e20| 50 3d 28 37 2e 31 39 32 | 45 2d 33 2d 33 2e 31 34 |P=(7.192|E-3-3.14|
|00003e30| 37 45 2d 33 2a 4a 31 29 | 2a 53 4a 35 2d 34 2e 33 |7E-3*J1)|*SJ5-4.3|
|00003e40| 34 34 45 2d 33 2a 53 4a | 33 2b 28 4a 31 2a 28 31 |44E-3*SJ|3+(J1*(1|
|00003e50| 2e 39 37 45 2d 34 2a 4a | 31 2d 36 2e 37 35 45 2d |.97E-4*J|1-6.75E-|
|00003e60| 34 29 2d 32 2e 30 34 32 | 38 45 2d 32 29 2a 43 4a |4)-2.042|8E-2)*CJ|
|00003e70| 35 2b 33 2e 34 30 33 36 | 45 2d 32 2a 43 4a 37 2a |5+3.4036|E-2*CJ7*|
|00003e80| 53 4a 33 2b 28 37 2e 32 | 36 39 45 2d 33 2b 36 2e |SJ3+(7.2|69E-3+6.|
|00003e90| 37 32 45 2d 34 2a 4a 31 | 29 2a 53 4a 37 2a 53 4a |72E-4*J1|)*SJ7*SJ|
|00003ea0| 33 2b 35 2e 36 31 34 45 | 2d 33 2a 43 32 4a 37 2a |3+5.614E|-3*C2J7*|
|00003eb0| 53 4a 33 2b 32 2e 39 36 | 34 45 2d 33 2a 43 33 4a |SJ3+2.96|4E-3*C3J|
|00003ec0| 37 2a 53 4a 33 2b 33 2e | 37 37 36 31 45 2d 32 2a |7*SJ3+3.|7761E-2*|
|00003ed0| 53 4a 37 2a 43 4a 33 2b | 36 2e 31 35 38 45 2d 33 |SJ7*CJ3+|6.158E-3|
|00003ee0| 2a 53 32 4a 37 2a 43 4a | 33 0d 13 f6 af 20 44 50 |*S2J7*CJ|3.... DP|
|00003ef0| 3d 44 50 2d 36 2e 36 30 | 33 45 2d 33 2a 43 4a 37 |=DP-6.60|3E-3*CJ7|
|00003f00| 2a 43 4a 33 2d 35 2e 33 | 35 36 45 2d 33 2a 53 4a |*CJ3-5.3|56E-3*SJ|
|00003f10| 37 2a 53 32 4a 33 2b 32 | 2e 37 32 32 45 2d 33 2a |7*S2J3+2|.722E-3*|
|00003f20| 53 32 4a 37 2a 53 32 4a | 33 2b 34 2e 34 38 33 45 |S2J7*S2J|3+4.483E|
|00003f30| 2d 33 2a 43 4a 37 2a 53 | 32 4a 33 2d 32 2e 36 34 |-3*CJ7*S|2J3-2.64|
|00003f40| 32 45 2d 33 2a 43 32 4a | 37 2a 53 32 4a 33 2b 34 |2E-3*C2J|7*S2J3+4|
|00003f50| 2e 34 30 33 45 2d 33 2a | 53 4a 37 2a 43 32 4a 33 |.403E-3*|SJ7*C2J3|
|00003f60| 2d 32 2e 35 33 36 45 2d | 33 2a 53 32 4a 37 2a 43 |-2.536E-|3*S2J7*C|
|00003f70| 32 4a 33 2b 35 2e 35 34 | 37 45 2d 33 2a 43 4a 37 |2J3+5.54|7E-3*CJ7|
|00003f80| 2a 43 32 4a 33 2d 32 2e | 36 38 39 45 2d 33 2a 43 |*C2J3-2.|689E-3*C|
|00003f90| 32 4a 37 2a 43 32 4a 33 | 0d 14 00 21 20 44 4d 3d |2J7*C2J3|...! DM=|
|00003fa0| 44 4d 4c 2d 28 a4 52 41 | 44 28 44 50 29 2f 50 4c |DML-(.RA|D(DP)/PL|
|00003fb0| 41 4e 28 49 50 2c 34 29 | 29 0d 14 0a 7e 20 44 41 |AN(IP,4)|)...~ DA|
|00003fc0| 3d 32 30 35 2a 43 4a 37 | 2d 32 36 33 2a 43 4a 35 |=205*CJ7|-263*CJ5|
|00003fd0| 2b 36 39 33 2a 43 32 4a | 37 2b 33 31 32 2a 43 33 |+693*C2J|7+312*C3|
|00003fe0| 4a 37 2b 31 34 37 2a 43 | 34 4a 37 2b 32 39 39 2a |J7+147*C|4J7+299*|
|00003ff0| 53 4a 33 2a 53 4a 37 2b | 31 38 31 2a 43 32 4a 37 |SJ3*SJ7+|181*C2J7|
|00004000| 2a 53 4a 33 2b 32 30 34 | 2a 53 32 4a 37 2a 43 4a |*SJ3+204|*S2J7*CJ|
|00004010| 33 2b 31 31 31 2a 53 33 | 4a 37 2a 43 4a 33 2d 33 |3+111*S3|J7*CJ3-3|
|00004020| 33 37 2a 43 4a 37 2a 43 | 4a 33 2d 31 31 31 2a 43 |37*CJ7*C|J3-111*C|
|00004030| 32 4a 37 2a 43 4a 33 0d | 14 14 0f 20 44 41 3d 44 |2J7*CJ3.|... DA=D|
|00004040| 41 2a 31 45 2d 36 0d 14 | 1e 06 20 e1 0d 14 28 06 |A*1E-6..|.. ...(.|
|00004050| 20 3a 0d 14 32 0d 20 dd | f2 53 61 74 75 72 6e 0d | :..2. .|.Saturn.|
|00004060| 14 3c 1e 20 53 33 4a 33 | 3d b5 28 33 2a 4a 33 29 |.<. S3J3|=.(3*J3)|
|00004070| 3a 43 33 4a 33 3d 9b 28 | 33 2a 4a 33 29 0d 14 46 |:C3J3=.(|3*J3)..F|
|00004080| 1e 20 53 34 4a 33 3d b5 | 28 34 2a 4a 33 29 3a 43 |. S4J3=.|(4*J3):C|
|00004090| 34 4a 33 3d 9b 28 34 2a | 4a 33 29 0d 14 50 1e 20 |4J3=.(4*|J3)..P. |
|000040a0| 43 32 4a 35 3d 9b 28 32 | 2a 4a 35 29 3a 53 35 4a |C2J5=.(2|*J5):S5J|
|000040b0| 37 3d b5 28 35 2a 4a 37 | 29 0d 14 5a 1a 20 4a 38 |7=.(5*J7|)..Z. J8|
|000040c0| 3d 4a 34 2d 4a 33 3a 53 | 32 4a 38 3d b5 28 32 2a |=J4-J3:S|2J8=.(2*|
|000040d0| 4a 38 29 0d 14 64 1e 20 | 43 32 4a 38 3d 9b 28 32 |J8)..d. |C2J8=.(2|
|000040e0| 2a 4a 38 29 3a 53 33 4a | 38 3d b5 28 33 2a 4a 38 |*J8):S3J|8=.(3*J8|
|000040f0| 29 0d 14 6e 11 20 43 33 | 4a 38 3d 9b 28 33 2a 4a |)..n. C3|J8=.(3*J|
|00004100| 38 29 0d 14 78 d2 20 44 | 4d 4c 3d 37 2e 35 38 31 |8)..x. D|ML=7.581|
|00004110| 45 2d 33 2a 53 32 4a 35 | 2d 37 2e 39 38 36 45 2d |E-3*S2J5|-7.986E-|
|00004120| 33 2a 53 4a 36 2d 31 2e | 34 38 38 31 31 45 2d 31 |3*SJ6-1.|48811E-1|
|00004130| 2a 53 4a 37 2d 34 2e 30 | 37 38 36 45 2d 32 2a 53 |*SJ7-4.0|786E-2*S|
|00004140| 32 4a 37 2d 28 38 2e 31 | 34 31 38 31 45 2d 31 2d |2J7-(8.1|4181E-1-|
|00004150| 28 31 2e 38 31 35 45 2d | 32 2d 31 2e 36 37 31 34 |(1.815E-|2-1.6714|
|00004160| 45 2d 32 2a 4a 31 29 2a | 4a 31 29 2a 53 4a 35 2d |E-2*J1)*|J1)*SJ5-|
|00004170| 28 31 2e 30 34 39 37 45 | 2d 32 2d 28 31 2e 36 30 |(1.0497E|-2-(1.60|
|00004180| 39 30 36 45 2d 31 2d 34 | 2e 31 45 2d 33 2a 4a 31 |906E-1-4|.1E-3*J1|
|00004190| 29 2a 4a 31 29 2a 43 4a | 35 2d 31 2e 35 32 30 38 |)*J1)*CJ|5-1.5208|
|000041a0| 45 2d 32 2a 53 33 4a 37 | 2d 36 2e 33 33 39 45 2d |E-2*S3J7|-6.339E-|
|000041b0| 33 2a 53 34 4a 37 2d 36 | 2e 32 34 34 45 2d 33 2a |3*S4J7-6|.244E-3*|
|000041c0| 53 4a 33 2d 31 2e 36 35 | 45 2d 32 2a 53 32 4a 37 |SJ3-1.65|E-2*S2J7|
|000041d0| 2a 53 4a 33 0d 14 82 c3 | 20 44 4d 4c 3d 44 4d 4c |*SJ3....| DML=DML|
|000041e0| 2b 28 38 2e 39 33 31 45 | 2d 33 2b 32 2e 37 32 38 |+(8.931E|-3+2.728|
|000041f0| 45 2d 33 2a 4a 31 29 2a | 53 4a 37 2a 53 4a 33 2d |E-3*J1)*|SJ7*SJ3-|
|00004200| 35 2e 37 37 35 45 2d 33 | 2a 53 33 4a 37 2a 53 4a |5.775E-3|*S3J7*SJ|
|00004210| 33 2b 28 38 2e 31 33 34 | 34 45 2d 32 2b 33 2e 32 |3+(8.134|4E-2+3.2|
|00004220| 30 36 45 2d 33 2a 4a 31 | 29 2a 43 4a 37 2a 53 4a |06E-3*J1|)*CJ7*SJ|
|00004230| 33 2b 31 2e 35 30 31 39 | 45 2d 32 2a 43 32 4a 37 |3+1.5019|E-2*C2J7|
|00004240| 2a 53 4a 33 2b 28 38 2e | 35 35 38 31 45 2d 33 2b |*SJ3+(8.|5581E-3+|
|00004250| 32 2e 34 39 34 45 2d 33 | 2a 4a 31 29 2a 53 4a 37 |2.494E-3|*J1)*SJ7|
|00004260| 2a 43 4a 33 2b 31 2e 34 | 33 39 34 45 2d 32 2a 43 |*CJ3+1.4|394E-2*C|
|00004270| 32 4a 37 2a 43 4a 33 2b | 28 32 2e 35 33 32 38 45 |2J7*CJ3+|(2.5328E|
|00004280| 2d 32 2d 33 2e 31 31 37 | 45 2d 33 2a 4a 31 29 2a |-2-3.117|E-3*J1)*|
|00004290| 43 4a 37 2a 43 4a 33 0d | 14 8c 8d 20 44 4d 4c 3d |CJ7*CJ3.|... DML=|
|000042a0| 44 4d 4c 2b 36 2e 33 31 | 39 45 2d 33 2a 43 33 4a |DML+6.31|9E-3*C3J|
|000042b0| 37 2a 43 4a 33 2b 36 2e | 33 36 39 45 2d 33 2a 53 |7*CJ3+6.|369E-3*S|
|000042c0| 4a 37 2a 43 32 4a 33 2b | 39 2e 31 35 36 45 2d 33 |J7*C2J3+|9.156E-3|
|000042d0| 2a 53 32 4a 37 2a 53 32 | 4a 33 2b 37 2e 35 32 35 |*S2J7*S2|J3+7.525|
|000042e0| 45 2d 33 2a 53 33 4a 38 | 2a 53 32 4a 33 2d 35 2e |E-3*S3J8|*S2J3-5.|
|000042f0| 32 33 36 45 2d 33 2a 43 | 4a 37 2a 43 32 4a 33 2d |236E-3*C|J7*C2J3-|
|00004300| 37 2e 37 33 36 45 2d 33 | 2a 43 32 4a 37 2a 43 32 |7.736E-3|*C2J7*C2|
|00004310| 4a 33 2d 37 2e 35 32 45 | 2d 33 2a 43 33 4a 38 2a |J3-7.52E|-3*C3J8*|
|00004320| 43 32 4a 33 0d 14 96 19 | 20 44 4d 4c 3d a4 52 41 |C2J3....| DML=.RA|
|00004330| 44 28 44 4d 4c 29 2a 30 | 2e 35 45 2d 31 0d 14 a0 |D(DML)*0|.5E-1...|
|00004340| be 20 44 53 3d 28 2d 37 | 39 32 37 2b 28 32 35 34 |. DS=(-7|927+(254|
|00004350| 38 2b 39 31 2a 4a 31 29 | 2a 4a 31 29 2a 53 4a 35 |8+91*J1)|*J1)*SJ5|
|00004360| 2b 28 31 33 33 38 31 2b | 28 31 32 32 36 2d 32 35 |+(13381+|(1226-25|
|00004370| 33 2a 4a 31 29 2a 4a 31 | 29 2a 43 4a 35 2b 28 32 |3*J1)*J1|)*CJ5+(2|
|00004380| 34 38 2d 31 32 31 31 2a | 4a 31 29 2a 53 32 4a 35 |48-1211*|J1)*S2J5|
|00004390| 2d 28 33 30 35 2b 39 31 | 2a 4a 31 29 2a 43 32 4a |-(305+91|*J1)*C2J|
|000043a0| 35 2b 34 31 32 2a 53 32 | 4a 37 2b 31 32 34 31 35 |5+412*S2|J7+12415|
|000043b0| 2a 53 4a 33 2b 28 33 39 | 30 2d 36 31 37 2a 4a 31 |*SJ3+(39|0-617*J1|
|000043c0| 29 2a 53 4a 37 2a 53 4a | 33 2b 28 31 36 35 2d 32 |)*SJ7*SJ|3+(165-2|
|000043d0| 30 34 2a 4a 31 29 2a 53 | 32 4a 37 2a 53 4a 33 2b |04*J1)*S|2J7*SJ3+|
|000043e0| 32 36 35 39 39 2a 43 4a | 37 2a 53 4a 33 2d 34 36 |26599*CJ|7*SJ3-46|
|000043f0| 38 37 2a 43 32 4a 37 2a | 53 4a 33 0d 14 aa c0 20 |87*C2J7*|SJ3.... |
|00004400| 44 53 3d 44 53 2d 31 38 | 37 30 2a 43 33 4a 37 2a |DS=DS-18|70*C3J7*|
|00004410| 53 4a 33 2d 38 32 31 2a | 43 34 4a 37 2a 53 4a 33 |SJ3-821*|C4J7*SJ3|
|00004420| 2d 33 37 37 2a 43 35 4a | 37 2a 53 4a 33 2b 34 39 |-377*C5J|7*SJ3+49|
|00004430| 37 2a 43 32 4a 38 2a 53 | 4a 33 2b 28 31 36 33 2d |7*C2J8*S|J3+(163-|
|00004440| 36 31 31 2a 4a 31 29 2a | 43 4a 33 2d 31 32 36 39 |611*J1)*|CJ3-1269|
|00004450| 36 2a 53 4a 37 2a 43 4a | 33 2d 34 32 30 30 2a 53 |6*SJ7*CJ|3-4200*S|
|00004460| 32 4a 37 2a 43 4a 33 2d | 31 35 30 33 2a 53 33 4a |2J7*CJ3-|1503*S3J|
|00004470| 37 2a 43 4a 33 2d 36 31 | 39 2a 53 34 4a 37 2a 43 |7*CJ3-61|9*S4J7*C|
|00004480| 4a 33 2d 32 36 38 2a 53 | 35 4a 37 2a 43 4a 33 2d |J3-268*S|5J7*CJ3-|
|00004490| 28 32 38 32 2b 31 33 30 | 36 2a 4a 31 29 2a 43 4a |(282+130|6*J1)*CJ|
|000044a0| 37 2a 43 4a 33 2b 28 2d | 38 36 2b 32 33 30 2a 4a |7*CJ3+(-|86+230*J|
|000044b0| 31 29 2a 43 32 4a 37 2a | 43 4a 33 0d 14 b4 c4 20 |1)*C2J7*|CJ3.... |
|000044c0| 44 53 3d 44 53 2b 34 36 | 31 2a 53 32 4a 38 2a 43 |DS=DS+46|1*S2J8*C|
|000044d0| 4a 33 2d 33 35 30 2a 53 | 32 4a 33 2b 28 32 32 31 |J3-350*S|2J3+(221|
|000044e0| 31 2d 32 38 36 2a 4a 31 | 29 2a 53 4a 37 2a 53 32 |1-286*J1|)*SJ7*S2|
|000044f0| 4a 33 2d 32 32 30 38 2a | 53 32 4a 37 2a 53 32 4a |J3-2208*|S2J7*S2J|
|00004500| 33 2d 35 36 38 2a 53 33 | 4a 37 2a 53 32 4a 33 2d |3-568*S3|J7*S2J3-|
|00004510| 33 34 36 2a 53 34 4a 37 | 2a 53 32 4a 33 2d 28 32 |346*S4J7|*S2J3-(2|
|00004520| 37 38 30 2b 32 32 32 2a | 4a 31 29 2a 43 4a 37 2a |780+222*|J1)*CJ7*|
|00004530| 53 32 4a 33 2b 28 32 30 | 32 32 2b 32 36 33 2a 4a |S2J3+(20|22+263*J|
|00004540| 31 29 2a 43 32 4a 37 2a | 53 32 4a 33 2b 32 34 38 |1)*C2J7*|S2J3+248|
|00004550| 2a 43 33 4a 37 2a 53 32 | 4a 33 2b 32 34 32 2a 53 |*C3J7*S2|J3+242*S|
|00004560| 33 4a 38 2a 53 32 4a 33 | 2b 34 36 37 2a 43 33 4a |3J8*S2J3|+467*C3J|
|00004570| 38 2a 53 32 4a 33 2d 34 | 39 30 2a 43 32 4a 33 0d |8*S2J3-4|90*C2J3.|
|00004580| 14 be d6 20 44 53 3d 44 | 53 2d 28 32 38 34 32 2b |... DS=D|S-(2842+|
|00004590| 32 37 39 2a 4a 31 29 2a | 53 4a 37 2a 43 32 4a 33 |279*J1)*|SJ7*C2J3|
|000045a0| 2b 28 31 32 38 2b 32 32 | 36 2a 4a 31 29 2a 53 32 |+(128+22|6*J1)*S2|
|000045b0| 4a 37 2a 43 32 4a 33 2b | 32 32 34 2a 53 33 4a 37 |J7*C2J3+|224*S3J7|
|000045c0| 2a 43 32 4a 33 2b 28 2d | 31 35 39 34 2b 32 38 32 |*C2J3+(-|1594+282|
|000045d0| 2a 4a 31 29 2a 43 4a 37 | 2a 43 32 4a 33 2b 28 32 |*J1)*CJ7|*C2J3+(2|
|000045e0| 31 36 32 2d 32 30 37 2a | 4a 31 29 2a 43 32 4a 37 |162-207*|J1)*C2J7|
|000045f0| 2a 43 32 4a 33 2b 35 36 | 31 2a 43 33 4a 37 2a 43 |*C2J3+56|1*C3J7*C|
|00004600| 32 4a 33 2b 33 34 33 2a | 43 34 4a 37 2a 43 32 4a |2J3+343*|C4J7*C2J|
|00004610| 33 2b 34 36 39 2a 53 33 | 4a 38 2a 43 32 4a 33 2d |3+469*S3|J8*C2J3-|
|00004620| 32 34 32 2a 43 33 4a 38 | 2a 43 32 4a 33 2d 32 30 |242*C3J8|*C2J3-20|
|00004630| 35 2a 53 4a 37 2a 53 33 | 4a 33 2b 32 36 32 2a 53 |5*SJ7*S3|J3+262*S|
|00004640| 33 4a 37 2a 53 33 4a 33 | 2b 32 30 38 2a 43 4a 37 |3J7*S3J3|+208*CJ7|
|00004650| 2a 43 33 4a 33 0d 14 c8 | 34 20 44 53 3d 44 53 2d |*C3J3...|4 DS=DS-|
|00004660| 32 37 31 2a 43 33 4a 37 | 2a 43 33 4a 33 2d 33 38 |271*C3J7|*C3J3-38|
|00004670| 32 2a 43 33 4a 37 2a 53 | 34 4a 33 2d 33 37 36 2a |2*C3J7*S|4J3-376*|
|00004680| 53 33 4a 37 2a 43 34 4a | 33 0d 14 d2 0f 20 44 53 |S3J7*C4J|3.... DS|
|00004690| 3d 44 53 2a 31 45 2d 37 | 0d 14 dc e2 20 44 50 3d |=DS*1E-7|.... DP=|
|000046a0| 28 37 2e 37 31 30 38 45 | 2d 32 2b 28 37 2e 31 38 |(7.7108E|-2+(7.18|
|000046b0| 36 45 2d 33 2d 31 2e 35 | 33 33 45 2d 33 2a 4a 31 |6E-3-1.5|33E-3*J1|
|000046c0| 29 2a 4a 31 29 2a 53 4a | 35 2d 37 2e 30 37 35 45 |)*J1)*SJ|5-7.075E|
|000046d0| 2d 33 2a 53 4a 37 2b 28 | 34 2e 35 38 30 33 45 2d |-3*SJ7+(|4.5803E-|
|000046e0| 32 2d 28 31 2e 34 37 36 | 36 45 2d 32 2b 35 2e 33 |2-(1.476|6E-2+5.3|
|000046f0| 36 45 2d 34 2a 4a 31 29 | 2a 4a 31 29 2a 43 4a 35 |6E-4*J1)|*J1)*CJ5|
|00004700| 2d 37 2e 32 35 38 36 45 | 2d 32 2a 43 4a 33 2d 37 |-7.2586E|-2*CJ3-7|
|00004710| 2e 35 38 32 35 45 2d 32 | 2a 53 4a 37 2a 53 4a 33 |.5825E-2|*SJ7*SJ3|
|00004720| 2d 32 2e 34 38 33 39 45 | 2d 32 2a 53 32 4a 37 2a |-2.4839E|-2*S2J7*|
|00004730| 53 4a 33 2d 38 2e 36 33 | 31 45 2d 33 2a 53 33 4a |SJ3-8.63|1E-3*S3J|
|00004740| 37 2a 53 4a 33 2d 31 2e | 35 30 33 38 33 45 2d 31 |7*SJ3-1.|50383E-1|
|00004750| 2a 43 4a 37 2a 43 4a 33 | 2b 32 2e 36 38 39 37 45 |*CJ7*CJ3|+2.6897E|
|00004760| 2d 32 2a 43 32 4a 37 2b | 31 2e 30 30 35 33 45 2d |-2*C2J7+|1.0053E-|
|00004770| 32 2a 43 33 4a 37 2a 43 | 4a 33 0d 14 e6 c3 20 44 |2*C3J7*C|J3.... D|
|00004780| 50 3d 44 50 2d 28 31 2e | 33 35 39 37 45 2d 32 2b |P=DP-(1.|3597E-2+|
|00004790| 31 2e 37 31 39 45 2d 33 | 2a 4a 31 29 2a 53 4a 37 |1.719E-3|*J1)*SJ7|
|000047a0| 2a 53 32 4a 33 2b 31 2e | 31 39 38 31 45 2d 32 2a |*S2J3+1.|1981E-2*|
|000047b0| 53 32 4a 37 2a 43 32 4a | 33 2d 28 37 2e 37 34 32 |S2J7*C2J|3-(7.742|
|000047c0| 45 2d 33 2d 31 2e 35 31 | 37 45 2d 33 2a 4a 31 29 |E-3-1.51|7E-3*J1)|
|000047d0| 2a 43 4a 37 2a 53 32 4a | 33 2b 28 31 2e 33 35 38 |*CJ7*S2J|3+(1.358|
|000047e0| 36 45 2d 32 2d 31 2e 33 | 37 35 45 2d 33 2a 4a 31 |6E-2-1.3|75E-3*J1|
|000047f0| 29 2a 43 32 4a 37 2a 53 | 32 4a 33 2d 28 31 2e 33 |)*C2J7*S|2J3-(1.3|
|00004800| 36 36 37 45 2d 32 2d 31 | 2e 32 33 39 45 2d 33 2a |667E-2-1|.239E-3*|
|00004810| 4a 31 29 2a 53 4a 37 2a | 43 32 4a 33 2b 28 31 2e |J1)*SJ7*|C2J3+(1.|
|00004820| 34 38 36 31 45 2d 32 2b | 31 2e 31 33 36 45 2d 33 |4861E-2+|1.136E-3|
|00004830| 2a 4a 31 29 2a 43 4a 37 | 2a 43 32 4a 33 0d 14 f0 |*J1)*CJ7|*C2J3...|
|00004840| 2c 20 44 50 3d 44 50 2d | 28 31 2e 33 30 36 34 45 |, DP=DP-|(1.3064E|
|00004850| 2d 32 2b 31 2e 36 32 38 | 45 2d 33 2a 4a 31 29 2a |-2+1.628|E-3*J1)*|
|00004860| 43 32 4a 37 2a 43 32 4a | 33 0d 14 fa 21 20 44 4d |C2J7*C2J|3...! DM|
|00004870| 3d 44 4d 4c 2d 28 a4 52 | 41 44 28 44 50 29 2f 50 |=DML-(.R|AD(DP)/P|
|00004880| 4c 41 4e 28 49 50 2c 34 | 29 29 0d 15 04 e4 20 44 |LAN(IP,4|)).... D|
|00004890| 41 3d 35 37 32 2a 53 4a | 35 2d 31 35 39 30 2a 53 |A=572*SJ|5-1590*S|
|000048a0| 32 4a 37 2a 43 4a 33 2b | 32 39 33 33 2a 43 4a 35 |2J7*CJ3+|2933*CJ5|
|000048b0| 2d 36 34 37 2a 53 33 4a | 37 2a 43 4a 33 2b 33 33 |-647*S3J|7*CJ3+33|
|000048c0| 36 32 39 2a 43 4a 37 2d | 33 34 34 2a 53 34 4a 37 |629*CJ7-|344*S4J7|
|000048d0| 2a 43 4a 33 2d 33 30 38 | 31 2a 43 32 4a 37 2b 32 |*CJ3-308|1*C2J7+2|
|000048e0| 38 38 35 2a 43 4a 37 2a | 43 33 4a 37 2b 28 32 31 |885*CJ7*|C3J7+(21|
|000048f0| 37 32 2b 31 30 32 2a 4a | 31 29 2a 43 32 4a 37 2a |72+102*J|1)*C2J7*|
|00004900| 43 4a 33 2d 36 37 31 2a | 43 34 4a 37 2b 32 39 36 |CJ3-671*|C4J7+296|
|00004910| 2a 43 33 4a 37 2a 43 4a | 33 2d 33 32 30 2a 43 35 |*C3J7*CJ|3-320*C5|
|00004920| 4a 37 2d 32 36 37 2a 53 | 32 4a 37 2a 53 32 4a 33 |J7-267*S|2J7*S2J3|
|00004930| 2b 31 30 39 38 2a 53 4a | 33 2d 37 37 38 2a 43 4a |+1098*SJ|3-778*CJ|
|00004940| 37 2a 53 32 4a 33 2d 32 | 38 31 32 2a 53 4a 37 2a |7*S2J3-2|812*SJ7*|
|00004950| 53 4a 33 2b 34 39 35 2a | 43 32 4a 37 2a 53 32 4a |SJ3+495*|C2J7*S2J|
|00004960| 33 2b 36 38 38 2a 53 32 | 4a 33 2a 53 4a 33 0d 15 |3+688*S2|J3*SJ3..|
|00004970| 0e e8 20 44 41 3d 44 41 | 2b 32 35 30 2a 43 33 4a |.. DA=DA|+250*C3J|
|00004980| 37 2a 53 32 4a 33 2d 33 | 39 33 2a 53 33 4a 37 2a |7*S2J3-3|93*S3J7*|
|00004990| 53 4a 33 2d 38 35 36 2a | 53 4a 37 2a 43 32 4a 33 |SJ3-856*|SJ7*C2J3|
|000049a0| 2d 32 32 38 2a 53 34 4a | 37 2a 53 4a 33 2b 34 34 |-228*S4J|7*SJ3+44|
|000049b0| 31 2a 53 32 4a 37 2a 43 | 32 4a 33 2b 32 31 33 38 |1*S2J7*C|2J3+2138|
|000049c0| 2a 43 4a 37 2a 53 4a 33 | 2b 32 39 36 2a 43 32 4a |*CJ7*SJ3|+296*C2J|
|000049d0| 37 2a 43 32 4a 33 2d 39 | 39 39 2a 43 32 4a 37 2a |7*C2J3-9|99*C2J7*|
|000049e0| 53 4a 33 2b 32 31 31 2a | 43 33 4a 37 2a 43 32 4a |SJ3+211*|C3J7*C2J|
|000049f0| 33 2d 36 34 32 2a 43 33 | 4a 37 2a 53 4a 33 2d 34 |3-642*C3|J7*SJ3-4|
|00004a00| 32 37 2a 53 4a 37 2a 53 | 33 4a 33 2d 33 32 35 2a |27*SJ7*S|3J3-325*|
|00004a10| 43 34 4a 37 2a 53 4a 33 | 2b 33 39 38 2a 53 33 4a |C4J7*SJ3|+398*S3J|
|00004a20| 37 2a 53 33 4a 33 2d 38 | 39 30 2a 43 4a 33 2b 33 |7*S3J3-8|90*CJ3+3|
|00004a30| 34 34 2a 43 4a 37 2a 43 | 33 4a 33 2b 32 32 30 36 |44*CJ7*C|3J3+2206|
|00004a40| 2a 53 4a 37 2a 43 4a 33 | 2d 34 32 37 2a 43 33 4a |*SJ7*CJ3|-427*C3J|
|00004a50| 37 2a 43 33 4a 33 0d 15 | 18 0f 20 44 41 3d 44 41 |7*C3J3..|.. DA=DA|
|00004a60| 2a 31 45 2d 36 0d 15 22 | 75 20 44 48 4c 3d 37 2e |*1E-6.."|u DHL=7.|
|00004a70| 34 37 45 2d 34 2a 43 4a | 37 2a 53 4a 33 2b 31 2e |47E-4*CJ|7*SJ3+1.|
|00004a80| 30 36 39 45 2d 33 2a 43 | 4a 37 2a 43 4a 33 2b 32 |069E-3*C|J7*CJ3+2|
|00004a90| 2e 32 31 30 38 45 2d 33 | 2a 53 32 4a 37 2a 53 32 |.2108E-3|*S2J7*S2|
|00004aa0| 4a 33 2b 31 2e 32 36 31 | 45 2d 33 2a 43 32 4a 37 |J3+1.261|E-3*C2J7|
|00004ab0| 2a 53 32 4a 33 2b 31 2e | 32 33 36 45 2d 33 2a 53 |*S2J3+1.|236E-3*S|
|00004ac0| 32 4a 37 2a 43 32 4a 33 | 2d 32 2e 30 37 45 2d 33 |2J7*C2J3|-2.07E-3|
|00004ad0| 2a 43 32 4a 37 2a 43 32 | 4a 33 0d 15 2c 12 20 44 |*C2J7*C2|J3..,. D|
|00004ae0| 48 4c 3d a4 52 41 44 28 | 44 48 4c 29 0d 15 36 06 |HL=.RAD(|DHL)..6.|
|00004af0| 20 e1 0d 15 40 06 20 3a | 0d 15 4a 20 20 f4 20 20 | ...@. :|..J  .  |
|00004b00| 20 20 2e 2e 2e 2e 55 72 | 61 6e 75 73 20 61 6e 64 |  ....Ur|anus and|
|00004b10| 20 4e 65 70 74 75 6e 65 | 0d 15 54 06 20 3a 0d 15 | Neptune|..T. :..|
|00004b20| 5e 0d 20 dd f2 4f 75 74 | 65 72 73 0d 15 68 1f 20 |^. ..Out|ers..h. |
|00004b30| 4a 38 3d a4 55 4e 57 28 | 31 2e 34 36 32 30 35 2b |J8=.UNW(|1.46205+|
|00004b40| 33 2e 38 31 33 33 37 2a | 54 29 0d 15 72 23 20 4a |3.81337*|T)..r# J|
|00004b50| 39 3d 32 2a 4a 38 2d 4a | 34 3a 53 4a 39 3d b5 28 |9=2*J8-J|4:SJ9=.(|
|00004b60| 4a 39 29 3a 43 4a 39 3d | 9b 28 4a 39 29 0d 15 7c |J9):CJ9=|.(J9)..||
|00004b70| 1e 20 53 32 4a 39 3d b5 | 28 32 2a 4a 39 29 3a 43 |. S2J9=.|(2*J9):C|
|00004b80| 32 4a 39 3d 9b 28 32 2a | 4a 39 29 0d 15 86 1e 20 |2J9=.(2*|J9).... |
|00004b90| e7 20 49 50 3d 37 20 f2 | 4e 65 70 74 75 6e 65 20 |. IP=7 .|Neptune |
|00004ba0| 8b 20 f2 55 72 61 6e 75 | 73 0d 15 90 06 20 e1 0d |. .Uranu|s.... ..|
|00004bb0| 15 9a 06 20 3a 0d 15 a4 | 0d 20 dd f2 55 72 61 6e |... :...|. ..Uran|
|00004bc0| 75 73 0d 15 ae 22 20 4a | 31 30 3d 4a 34 2d 4a 32 |us..." J|10=J4-J2|
|00004bd0| 3a 4a 31 31 3d 4a 34 2d | 4a 33 3a 4a 31 32 3d 4a |:J11=J4-|J3:J12=J|
|00004be0| 38 2d 4a 34 0d 15 b8 7b | 20 44 4d 4c 3d 28 38 2e |8-J4...{| DML=(8.|
|00004bf0| 36 34 33 31 39 45 2d 31 | 2d 31 2e 35 38 33 45 2d |64319E-1|-1.583E-|
|00004c00| 33 2a 4a 31 29 2a 53 4a | 39 2b 28 38 2e 32 32 32 |3*J1)*SJ|9+(8.222|
|00004c10| 32 45 2d 32 2d 36 2e 38 | 33 33 45 2d 33 2a 4a 31 |2E-2-6.8|33E-3*J1|
|00004c20| 29 2a 43 4a 39 2b 33 2e | 36 30 31 37 45 2d 32 2a |)*CJ9+3.|6017E-2*|
|00004c30| 53 32 4a 39 2d 33 2e 30 | 31 39 45 2d 33 2a 43 32 |S2J9-3.0|19E-3*C2|
|00004c40| 4a 39 2b 38 2e 31 32 32 | 45 2d 33 2a b5 28 4a 36 |J9+8.122|E-3*.(J6|
|00004c50| 29 3a 44 4d 4c 3d a4 52 | 41 44 28 44 4d 4c 29 0d |):DML=.R|AD(DML).|
|00004c60| 15 c2 3f 20 44 50 3d 31 | 2e 32 30 33 30 33 45 2d |..? DP=1|.20303E-|
|00004c70| 31 2a 53 4a 39 2b 36 2e | 31 39 37 45 2d 33 2a 53 |1*SJ9+6.|197E-3*S|
|00004c80| 32 4a 39 2b 28 31 2e 39 | 34 37 32 45 2d 32 2d 39 |2J9+(1.9|472E-2-9|
|00004c90| 2e 34 37 45 2d 34 2a 4a | 31 29 2a 43 4a 39 0d 15 |.47E-4*J|1)*CJ9..|
|00004ca0| cc 21 20 44 4d 3d 44 4d | 4c 2d 28 a4 52 41 44 28 |.! DM=DM|L-(.RAD(|
|00004cb0| 44 50 29 2f 50 4c 41 4e | 28 49 50 2c 34 29 29 0d |DP)/PLAN|(IP,4)).|
|00004cc0| 15 d6 38 20 44 53 3d 28 | 31 36 33 2a 4a 31 2d 33 |..8 DS=(|163*J1-3|
|00004cd0| 33 34 39 29 2a 53 4a 39 | 2b 32 30 39 38 31 2a 43 |349)*SJ9|+20981*C|
|00004ce0| 4a 39 2b 31 33 31 31 2a | 43 32 4a 39 3a 44 53 3d |J9+1311*|C2J9:DS=|
|00004cf0| 44 53 2a 31 45 2d 37 0d | 15 e0 15 20 44 41 3d 2d |DS*1E-7.|... DA=-|
|00004d00| 33 2e 38 32 35 45 2d 33 | 2a 43 4a 39 0d 15 ea bf |3.825E-3|*CJ9....|
|00004d10| 20 44 4c 3d 28 31 2e 30 | 31 32 32 45 2d 32 2d 39 | DL=(1.0|122E-2-9|
|00004d20| 2e 38 38 45 2d 34 2a 4a | 31 29 2a b5 28 4a 34 2b |.88E-4*J|1)*.(J4+|
|00004d30| 4a 31 31 29 2b 28 2d 33 | 2e 38 35 38 31 45 2d 32 |J11)+(-3|.8581E-2|
|00004d40| 2b 28 32 2e 30 33 31 45 | 2d 33 2d 31 2e 39 31 45 |+(2.031E|-3-1.91E|
|00004d50| 2d 33 2a 4a 31 29 2a 4a | 31 29 2a 9b 28 4a 34 2b |-3*J1)*J|1)*.(J4+|
|00004d60| 4a 31 31 29 2b 28 33 2e | 34 39 36 34 45 2d 32 2d |J11)+(3.|4964E-2-|
|00004d70| 28 31 2e 30 33 38 45 2d | 33 2d 38 2e 36 38 45 2d |(1.038E-|3-8.68E-|
|00004d80| 34 2a 4a 31 29 2a 4a 31 | 29 2a 9b 28 32 2a 4a 34 |4*J1)*J1|)*.(2*J4|
|00004d90| 2b 4a 31 31 29 2b 35 2e | 35 39 34 45 2d 33 2a b5 |+J11)+5.|594E-3*.|
|00004da0| 28 4a 34 2b 33 2a 4a 31 | 32 29 2d 31 2e 34 38 30 |(J4+3*J1|2)-1.480|
|00004db0| 38 45 2d 32 2a b5 28 4a | 31 30 29 2d 35 2e 37 39 |8E-2*.(J|10)-5.79|
|00004dc0| 34 45 2d 33 2a b5 28 4a | 31 31 29 0d 15 f4 4e 20 |4E-3*.(J|11)...N |
|00004dd0| 44 4c 3d 44 4c 2b 32 2e | 33 34 37 45 2d 33 2a 9b |DL=DL+2.|347E-3*.|
|00004de0| 28 4a 31 31 29 2b 39 2e | 38 37 32 45 2d 33 2a b5 |(J11)+9.|872E-3*.|
|00004df0| 28 4a 31 32 29 2b 38 2e | 38 30 33 45 2d 33 2a b5 |(J12)+8.|803E-3*.|
|00004e00| 28 32 2a 4a 31 32 29 2d | 34 2e 33 30 38 45 2d 33 |(2*J12)-|4.308E-3|
|00004e10| 2a b5 28 33 2a 4a 31 32 | 29 0d 15 fe 1c 20 53 4a |*.(3*J12|).... SJ|
|00004e20| 31 31 3d b5 28 4a 31 31 | 29 3a 43 4a 31 31 3d 9b |11=.(J11|):CJ11=.|
|00004e30| 28 4a 31 31 29 0d 16 08 | 18 20 53 4a 34 3d b5 28 |(J11)...|. SJ4=.(|
|00004e40| 4a 34 29 3a 43 4a 34 3d | 9b 28 4a 34 29 0d 16 12 |J4):CJ4=|.(J4)...|
|00004e50| 1e 20 53 32 4a 34 3d b5 | 28 32 2a 4a 34 29 3a 43 |. S2J4=.|(2*J4):C|
|00004e60| 32 4a 34 3d 9b 28 32 2a | 4a 34 29 0d 16 1c 90 20 |2J4=.(2*|J4).... |
|00004e70| 44 48 4c 3d 28 34 2e 35 | 38 45 2d 34 2a 53 4a 31 |DHL=(4.5|8E-4*SJ1|
|00004e80| 31 2d 36 2e 34 32 45 2d | 34 2a 43 4a 31 31 2d 35 |1-6.42E-|4*CJ11-5|
|00004e90| 2e 31 37 45 2d 34 2a 9b | 28 34 2a 4a 31 32 29 29 |.17E-4*.|(4*J12))|
|00004ea0| 2a 53 4a 34 2d 28 33 2e | 34 37 45 2d 34 2a 53 4a |*SJ4-(3.|47E-4*SJ|
|00004eb0| 31 31 2b 38 2e 35 33 45 | 2d 34 2a 43 4a 31 31 2b |11+8.53E|-4*CJ11+|
|00004ec0| 35 2e 31 37 45 2d 34 2a | b5 28 34 2a 4a 31 31 29 |5.17E-4*|.(4*J11)|
|00004ed0| 29 2a 43 4a 34 2b 34 2e | 30 33 45 2d 34 2a 28 9b |)*CJ4+4.|03E-4*(.|
|00004ee0| 28 32 2a 4a 31 32 29 2a | 53 32 4a 34 2b b5 28 32 |(2*J12)*|S2J4+.(2|
|00004ef0| 2a 4a 31 32 29 2a 43 32 | 4a 34 29 0d 16 26 12 20 |*J12)*C2|J4)..&. |
|00004f00| 44 48 4c 3d a4 52 41 44 | 28 44 48 4c 29 0d 16 30 |DHL=.RAD|(DHL)..0|
|00004f10| 96 20 44 52 3d 2d 32 35 | 39 34 38 2b 34 39 38 35 |. DR=-25|948+4985|
|00004f20| 2a 9b 28 4a 31 30 29 2d | 31 32 33 30 2a 43 4a 34 |*.(J10)-|1230*CJ4|
|00004f30| 2b 33 33 35 34 2a 43 4a | 31 31 2b 39 30 34 2a 9b |+3354*CJ|11+904*.|
|00004f40| 28 32 2a 4a 31 32 29 2b | 38 39 34 2a 28 9b 28 4a |(2*J12)+|894*(.(J|
|00004f50| 31 32 29 2d 9b 28 33 2a | 4a 31 32 29 29 2b 28 35 |12)-.(3*|J12))+(5|
|00004f60| 37 39 35 2a 43 4a 34 2d | 31 31 36 35 2a 53 4a 34 |795*CJ4-|1165*SJ4|
|00004f70| 2b 31 33 38 38 2a 43 32 | 4a 34 29 2a 53 4a 31 31 |+1388*C2|J4)*SJ11|
|00004f80| 2b 28 31 33 35 31 2a 43 | 4a 34 2b 35 37 30 32 2a |+(1351*C|J4+5702*|
|00004f90| 53 4a 34 2b 31 33 38 38 | 2a 53 32 4a 34 29 2a 43 |SJ4+1388|*S2J4)*C|
|00004fa0| 4a 31 31 0d 16 3a 0f 20 | 44 52 3d 44 52 2a 31 45 |J11..:. |DR=DR*1E|
|00004fb0| 2d 36 0d 16 44 06 20 e1 | 0d 16 4e 06 20 3a 0d 16 |-6..D. .|..N. :..|
|00004fc0| 58 0e 20 dd f2 4e 65 70 | 74 75 6e 65 0d 16 62 22 |X. ..Nep|tune..b"|
|00004fd0| 20 4a 31 30 3d 4a 38 2d | 4a 32 3a 4a 31 31 3d 4a | J10=J8-|J2:J11=J|
|00004fe0| 38 2d 4a 33 3a 4a 31 32 | 3d 4a 38 2d 4a 34 0d 16 |8-J3:J12|=J8-J4..|
|00004ff0| 6c 5e 20 44 4d 4c 3d 28 | 31 2e 30 38 39 45 2d 33 |l^ DML=(|1.089E-3|
|00005000| 2a 4a 31 2d 35 2e 38 39 | 38 33 33 45 2d 31 29 2a |*J1-5.89|833E-1)*|
|00005010| 53 4a 39 2b 28 34 2e 36 | 35 38 45 2d 33 2a 4a 31 |SJ9+(4.6|58E-3*J1|
|00005020| 2d 35 2e 36 30 39 34 45 | 2d 32 29 2a 43 4a 39 2d |-5.6094E|-2)*CJ9-|
|00005030| 32 2e 34 32 38 36 45 2d | 32 2a 53 32 4a 39 3a 44 |2.4286E-|2*S2J9:D|
|00005040| 4d 4c 3d a4 52 41 44 28 | 44 4d 4c 29 0d 16 76 3f |ML=.RAD(|DML)..v?|
|00005050| 20 44 50 3d 32 2e 34 30 | 33 39 45 2d 32 2a 53 4a | DP=2.40|39E-2*SJ|
|00005060| 39 2d 32 2e 35 33 30 33 | 45 2d 32 2a 43 4a 39 2b |9-2.5303|E-2*CJ9+|
|00005070| 36 2e 32 30 36 45 2d 33 | 2a 53 32 4a 39 2d 35 2e |6.206E-3|*S2J9-5.|
|00005080| 39 39 32 45 2d 33 2a 43 | 32 4a 39 0d 16 80 21 20 |992E-3*C|2J9...! |
|00005090| 44 4d 3d 44 4d 4c 2d 28 | a4 52 41 44 28 44 50 29 |DM=DML-(|.RAD(DP)|
|000050a0| 2f 50 4c 41 4e 28 49 50 | 2c 34 29 29 0d 16 8a 2d |/PLAN(IP|,4))...-|
|000050b0| 20 44 53 3d 34 33 38 39 | 2a 53 4a 39 2b 31 31 32 | DS=4389|*SJ9+112|
|000050c0| 39 2a 53 32 4a 39 2b 34 | 32 36 32 2a 43 4a 39 2b |9*S2J9+4|262*CJ9+|
|000050d0| 31 30 38 39 2a 43 32 4a | 39 0d 16 94 0f 20 44 53 |1089*C2J|9.... DS|
|000050e0| 3d 44 53 2a 31 45 2d 37 | 0d 16 9e 21 20 44 41 3d |=DS*1E-7|...! DA=|
|000050f0| 38 31 38 39 2a 43 4a 39 | 2d 38 31 37 2a 53 4a 39 |8189*CJ9|-817*SJ9|
|00005100| 2b 37 38 31 2a 43 32 4a | 39 0d 16 a8 0f 20 44 41 |+781*C2J|9.... DA|
|00005110| 3d 44 41 2a 31 45 2d 36 | 0d 16 b2 22 20 53 32 4a |=DA*1E-6|..." S2J|
|00005120| 31 32 3d b5 28 32 2a 4a | 31 32 29 3a 43 32 4a 31 |12=.(2*J|12):C2J1|
|00005130| 32 3d 9b 28 32 2a 4a 31 | 32 29 0d 16 bc 18 20 53 |2=.(2*J1|2).... S|
|00005140| 4a 38 3d b5 28 4a 38 29 | 3a 43 4a 38 3d 9b 28 4a |J8=.(J8)|:CJ8=.(J|
|00005150| 38 29 0d 16 c6 5d 20 44 | 4c 3d 2d 39 2e 35 35 36 |8)...] D|L=-9.556|
|00005160| 45 2d 33 2a b5 28 4a 31 | 30 29 2d 35 2e 31 37 38 |E-3*.(J1|0)-5.178|
|00005170| 45 2d 33 2a b5 28 4a 31 | 31 29 2b 32 2e 35 37 32 |E-3*.(J1|1)+2.572|
|00005180| 45 2d 33 2a 53 32 4a 31 | 32 2d 32 2e 39 37 32 45 |E-3*S2J1|2-2.972E|
|00005190| 2d 33 2a 43 32 4a 31 32 | 2a 53 4a 38 2d 32 2e 38 |-3*C2J12|*SJ8-2.8|
|000051a0| 33 33 45 2d 33 2a 53 32 | 4a 31 32 2a 43 4a 38 0d |33E-3*S2|J12*CJ8.|
|000051b0| 16 d0 2c 20 44 48 4c 3d | 33 2e 33 36 45 2d 34 2a |.., DHL=|3.36E-4*|
|000051c0| 43 32 4a 31 32 2a 53 4a | 38 2b 33 2e 36 34 45 2d |C2J12*SJ|8+3.64E-|
|000051d0| 34 2a 53 32 4a 31 32 2a | 43 4a 38 0d 16 da 12 20 |4*S2J12*|CJ8.... |
|000051e0| 44 48 4c 3d a4 52 41 44 | 28 44 48 4c 29 0d 16 e4 |DHL=.RAD|(DHL)...|
|000051f0| 3d 20 44 52 3d 2d 34 30 | 35 39 36 2b 34 39 39 32 |= DR=-40|596+4992|
|00005200| 2a 9b 28 4a 31 30 29 2b | 32 37 34 34 2a 9b 28 4a |*.(J10)+|2744*.(J|
|00005210| 31 31 29 2b 32 30 34 34 | 2a 9b 28 4a 31 32 29 2b |11)+2044|*.(J12)+|
|00005220| 31 30 35 31 2a 43 32 4a | 31 32 0d 16 ee 0f 20 44 |1051*C2J|12.... D|
|00005230| 52 3d 44 52 2a 31 45 2d | 36 0d 16 f8 06 20 e1 0d |R=DR*1E-|6.... ..|
|00005240| 17 02 06 20 3a 0d 17 0c | 0c 20 dd f2 52 69 73 65 |... :...|. ..Rise|
|00005250| 74 0d 17 16 17 20 e7 20 | 46 4c 41 47 28 39 29 3d |t.... . |FLAG(9)=|
|00005260| 31 20 8c 20 8d 54 74 57 | 0d 17 20 1c 20 43 50 48 |1 . .TtW|.. . CPH|
|00005270| 49 3d 9b 28 50 48 49 29 | 3a 53 50 48 49 3d b5 28 |I=.(PHI)|:SPHI=.(|
|00005280| 50 48 49 29 0d 17 2a 0e | 20 46 4c 41 47 28 39 29 |PHI)..*.| FLAG(9)|
|00005290| 3d 31 0d 17 34 16 20 43 | 59 3d 9b 28 59 29 3a 41 |=1..4. C|Y=.(Y):A|
|000052a0| 3d 43 59 2a 43 50 48 49 | 0d 17 3e 1d 20 e7 20 94 |=CY*CPHI|..>. . .|
|000052b0| 28 41 29 3c 31 45 2d 31 | 30 20 8c 20 f2 45 72 72 |(A)<1E-1|0 . .Err|
|000052c0| 6f 72 33 3a e1 0d 17 48 | 11 20 43 50 53 49 3d 53 |or3:...H|. CPSI=S|
|000052d0| 50 48 49 2f 43 59 0d 17 | 52 16 20 e7 20 43 50 53 |PHI/CY..|R. . CPS|
|000052e0| 49 3e 31 20 8c 20 43 50 | 53 49 3d 31 0d 17 5c 18 |I>1 . CP|SI=1..\.|
|000052f0| 20 e7 20 43 50 53 49 3c | 2d 31 20 8c 20 43 50 53 | . CPSI<|-1 . CPS|
|00005300| 49 3d 2d 31 0d 17 66 1f | 20 50 53 49 3d a4 41 43 |I=-1..f.| PSI=.AC|
|00005310| 53 28 43 50 53 49 29 3a | 53 50 53 49 3d b5 28 50 |S(CPSI):|SPSI=.(P|
|00005320| 53 49 29 0d 17 70 20 20 | 44 48 3d 44 49 53 2a 53 |SI)..p  |DH=DIS*S|
|00005330| 50 53 49 3a 59 31 3d 59 | 2b 28 44 49 53 2a 43 50 |PSI:Y1=Y|+(DIS*CP|
|00005340| 53 49 29 0d 17 7a 16 20 | 53 59 3d b5 28 59 31 29 |SI)..z. |SY=.(Y1)|
|00005350| 3a 54 59 3d b7 28 59 31 | 29 0d 17 84 19 20 43 48 |:TY=.(Y1|).... CH|
|00005360| 3d 28 2d 31 2a 53 50 48 | 49 2a 54 59 29 2f 43 50 |=(-1*SPH|I*TY)/CP|
|00005370| 48 49 0d 17 8e 18 20 e7 | 20 43 48 3c 2d 31 20 8c |HI.... .| CH<-1 .|
|00005380| 20 f2 45 72 72 6f 72 31 | 3a e1 0d 17 98 17 20 e7 | .Error1|:..... .|
|00005390| 20 43 48 3e 31 20 8c 20 | f2 45 72 72 6f 72 32 3a | CH>1 . |.Error2:|
|000053a0| e1 0d 17 a2 16 20 45 52 | 52 31 3d 30 3a 48 3d a4 |..... ER|R1=0:H=.|
|000053b0| 41 43 53 28 43 48 29 0d | 17 ac 19 20 48 3d 28 48 |ACS(CH).|... H=(H|
|000053c0| 2b 44 48 29 2a 33 2e 38 | 31 39 37 31 38 36 33 34 |+DH)*3.8|19718634|
|000053d0| 0d 17 b6 19 20 4c 53 54 | 52 3d 32 34 2b 58 2d 48 |.... LST|R=24+X-H|
|000053e0| 3a 4c 53 54 53 3d 58 2b | 48 0d 17 c0 20 20 43 41 |:LSTS=X+|H...  CA|
|000053f0| 5a 52 3d 53 59 2f 43 50 | 48 49 3a 41 5a 52 3d a4 |ZR=SY/CP|HI:AZR=.|
|00005400| 41 43 53 28 43 41 5a 52 | 29 0d 17 ca 24 20 41 5a |ACS(CAZR|)...$ AZ|
|00005410| 53 3d 54 50 49 2d 41 5a | 52 3a 42 3d 4c 53 54 52 |S=TPI-AZ|R:B=LSTR|
|00005420| 3a 43 3d 32 34 3a f2 41 | 64 6a 75 73 74 0d 17 d4 |:C=24:.A|djust...|
|00005430| 21 20 4c 53 54 52 3d 42 | 3a 42 3d 4c 53 54 53 3a |! LSTR=B|:B=LSTS:|
|00005440| f2 41 64 6a 75 73 74 3a | 4c 53 54 53 3d 42 0d 17 |.Adjust:|LSTS=B..|
|00005450| de 1e 20 42 3d 41 5a 52 | 3a 43 3d 54 50 49 3a f2 |.. B=AZR|:C=TPI:.|
|00005460| 41 64 6a 75 73 74 3a 41 | 5a 52 3d 42 0d 17 e8 18 |Adjust:A|ZR=B....|
|00005470| 20 42 3d 41 5a 53 3a f2 | 41 64 6a 75 73 74 3a 41 | B=AZS:.|Adjust:A|
|00005480| 5a 53 3d 42 0d 17 f2 06 | 20 e1 0d 17 fc 06 20 3a |ZS=B....| ..... :|
|00005490| 0d 18 06 0d 20 dd f2 41 | 64 6a 75 73 74 0d 18 10 |.... ..A|djust...|
|000054a0| 12 20 e7 20 42 3c 30 20 | 8c 20 42 3d 42 2b 43 0d |. . B<0 |. B=B+C.|
|000054b0| 18 1a 12 20 e7 20 42 3e | 43 20 8c 20 42 3d 42 2d |... . B>|C . B=B-|
|000054c0| 43 0d 18 24 06 20 e1 0d | 18 2e 06 20 3a 0d 18 38 |C..$. ..|... :..8|
|000054d0| 0d 20 dd f2 45 72 72 6f | 72 31 0d 18 42 21 20 45 |. ..Erro|r1..B! E|
|000054e0| 52 52 31 3d 2d 31 3a f1 | 22 2a 2a 20 63 69 72 63 |RR1=-1:.|"** circ|
|000054f0| 75 6d 70 6f 6c 61 72 20 | 2a 2a 22 0d 18 4c 06 20 |umpolar |**"..L. |
|00005500| e1 0d 18 56 06 20 3a 0d | 18 60 0d 20 dd f2 45 72 |...V. :.|.`. ..Er|
|00005510| 72 6f 72 32 0d 18 6a 20 | 20 45 52 52 31 3d 31 3a |ror2..j | ERR1=1:|
|00005520| f1 22 2a 2a 20 6e 65 76 | 65 72 20 72 69 73 65 73 |."** nev|er rises|
|00005530| 20 2a 2a 22 0d 18 74 06 | 20 e1 0d 18 7e 06 20 3a | **"..t.| ...~. :|
|00005540| 0d 18 88 0d 20 dd f2 45 | 72 72 6f 72 33 0d 18 92 |.... ..E|rror3...|
|00005550| 2b 20 45 52 52 31 3d 32 | 3a f1 22 2a 2a 20 69 6d |+ ERR1=2|:."** im|
|00005560| 70 6f 73 73 69 62 6c 65 | 20 63 61 6c 63 75 6c 61 |possible| calcula|
|00005570| 74 69 6f 6e 20 2a 2a 22 | 0d 18 9c 06 20 e1 0d 18 |tion **"|.... ...|
|00005580| a6 06 20 3a 0d 18 b0 0c | 20 dd f2 53 75 6e 72 73 |.. :....| ..Sunrs|
|00005590| 0d 18 ba 16 20 44 59 30 | 3d 44 59 3a 44 59 3d 44 |.... DY0|=DY:DY=D|
|000055a0| 59 30 2b 30 2e 35 0d 18 | c4 0d 20 f2 53 75 6e 72 |Y0+0.5..|.. .Sunr|
|000055b0| 73 75 6e 0d 18 ce 14 20 | e7 20 45 52 52 31 20 3c |sun.... |. ERR1 <|
|000055c0| 3e 20 30 20 8c 20 e1 0d | 18 d8 25 20 41 4c 3d 4c |> 0 . ..|..% AL=L|
|000055d0| 4f 4e 47 2f 31 35 3a 54 | 52 3d 4c 53 54 52 2d 41 |ONG/15:T|R=LSTR-A|
|000055e0| 4c 3a 54 53 3d 4c 53 54 | 53 2d 41 4c 0d 18 e2 22 |L:TS=LST|S-AL..."|
|000055f0| 20 f2 43 6f 72 72 65 63 | 74 3a 44 59 3d 44 59 30 | .Correc|t:DY=DY0|
|00005600| 3a 54 49 4d 3d 54 52 3a | 53 57 32 3d 2d 31 0d 18 |:TIM=TR:|SW2=-1..|
|00005610| ec 19 20 f2 47 74 69 6d | 65 3a 45 52 52 32 3d 30 |.. .Gtim|e:ERR2=0|
|00005620| 3a 45 52 52 33 3d 30 0d | 18 f6 1c 20 e7 20 47 54 |:ERR3=0.|... . GT|
|00005630| 4d 3c 36 2e 35 35 32 45 | 2d 32 20 8c 20 45 52 52 |M<6.552E|-2 . ERR|
|00005640| 33 3d 31 0d 19 00 1b 20 | 47 54 4d 52 3d 47 54 4d |3=1.... |GTMR=GTM|
|00005650| 3a 54 49 4d 3d 54 53 3a | f2 47 74 69 6d 65 0d 19 |:TIM=TS:|.Gtime..|
|00005660| 0a 16 20 47 54 4d 53 3d | 47 54 4d 3a 44 4a 44 30 |.. GTMS=|GTM:DJD0|
|00005670| 3d 44 4a 44 0d 19 14 1e | 20 44 4a 44 3d 44 4a 44 |=DJD....| DJD=DJD|
|00005680| 30 2b 47 54 4d 52 2f 32 | 34 3a f2 53 75 6e 72 73 |0+GTMR/2|4:.Sunrs|
|00005690| 75 6e 0d 19 1e 13 20 e7 | 20 45 52 52 31 20 3c 3e |un.... .| ERR1 <>|
|000056a0| 30 20 8c 20 e1 0d 19 28 | 18 20 41 5a 52 30 3d 41 |0 . ...(|. AZR0=A|
|000056b0| 5a 52 3a 54 52 3d 4c 53 | 54 52 2d 41 4c 0d 19 32 |ZR:TR=LS|TR-AL..2|
|000056c0| 1e 20 44 4a 44 3d 44 4a | 44 30 2b 47 54 4d 53 2f |. DJD=DJ|D0+GTMS/|
|000056d0| 32 34 3a f2 53 75 6e 72 | 73 75 6e 0d 19 3c 13 20 |24:.Sunr|sun..<. |
|000056e0| e7 20 45 52 52 31 20 3c | 3e 30 20 8c 20 e1 0d 19 |. ERR1 <|>0 . ...|
|000056f0| 46 06 20 3a 0d 19 50 21 | 20 41 5a 53 30 3d 41 5a |F. :..P!| AZS0=AZ|
|00005700| 53 3a 54 53 3d 4c 53 54 | 53 2d 41 4c 3a f2 43 6f |S:TS=LST|S-AL:.Co|
|00005710| 72 72 65 63 74 0d 19 5a | 12 20 54 49 4d 3d 54 52 |rrect..Z|. TIM=TR|
|00005720| 3a f2 47 74 69 6d 65 0d | 19 64 1c 20 e7 20 47 54 |:.Gtime.|.d. . GT|
|00005730| 4d 3c 36 2e 35 35 32 45 | 2d 32 20 8c 20 45 52 52 |M<6.552E|-2 . ERR|
|00005740| 32 3d 31 0d 19 6e 19 20 | 48 53 52 3d 48 53 3a 4d |2=1..n. |HSR=HS:M|
|00005750| 53 52 3d 4d 53 3a 53 53 | 52 3d 53 53 0d 19 78 12 |SR=MS:SS|R=SS..x.|
|00005760| 20 54 49 4d 3d 54 53 3a | f2 47 74 69 6d 65 0d 19 | TIM=TS:|.Gtime..|
|00005770| 82 1c 20 e7 20 47 54 4d | 3c 36 2e 35 35 32 45 2d |.. . GTM|<6.552E-|
|00005780| 32 20 8c 20 45 52 52 33 | 3d 31 0d 19 8c 19 20 48 |2 . ERR3|=1.... H|
|00005790| 53 53 3d 48 53 3a 4d 53 | 53 3d 4d 53 3a 53 53 53 |SS=HS:MS|S=MS:SSS|
|000057a0| 3d 53 53 0d 19 96 06 20 | e1 0d 19 a0 06 20 3a 0d |=SS.... |..... :.|
|000057b0| 19 aa 0e 20 dd f2 43 6f | 72 72 65 63 74 0d 19 b4 |... ..Co|rrect...|
|000057c0| 16 20 e7 20 54 52 3c 30 | 20 8c 20 54 52 3d 54 52 |. . TR<0| . TR=TR|
|000057d0| 2b 32 34 0d 19 be 16 20 | e7 20 54 53 3c 30 20 8c |+24.... |. TS<0 .|
|000057e0| 20 54 53 3d 54 53 2b 32 | 34 0d 19 c8 17 20 e7 20 | TS=TS+2|4.... . |
|000057f0| 54 52 3e 32 34 20 8c 20 | 54 52 3d 54 52 2d 32 34 |TR>24 . |TR=TR-24|
|00005800| 0d 19 d2 17 20 e7 20 54 | 53 3e 32 34 20 8c 20 54 |.... . T|S>24 . T|
|00005810| 53 3d 54 53 2d 32 34 0d | 19 dc 06 20 e1 0d 19 e6 |S=TS-24.|... ....|
|00005820| 06 20 3a 0d 19 f0 0e 20 | dd f2 53 75 6e 72 73 75 |. :.... |..Sunrsu|
|00005830| 6e 0d 19 fa 15 20 f2 53 | 75 6e 3a f2 4e 75 74 61 |n.... .S|un:.Nuta|
|00005840| 74 3a 48 54 3d 30 0d 1a | 04 28 20 58 3d 4c 53 4e |t:HT=0..|.( X=LSN|
|00005850| 2b 31 2e 37 34 35 33 32 | 39 32 35 32 45 2d 32 2a |+1.74532|9252E-2*|
|00005860| 28 44 50 53 49 2d 35 2e | 36 39 45 2d 33 29 0d 1a |(DPSI-5.|69E-3)..|
|00005870| 0e 16 20 59 3d 30 3a 53 | 57 33 3d 2d 31 3a f2 45 |.. Y=0:S|W3=-1:.E|
|00005880| 71 65 63 6c 0d 1a 18 1f | 20 58 3d 33 2e 38 31 39 |qecl....| X=3.819|
|00005890| 37 31 38 36 33 34 2a 50 | 3a 59 3d 51 3a f2 52 69 |718634*P|:Y=Q:.Ri|
|000058a0| 73 65 74 0d 1a 22 06 20 | e1 0d 1a 2c 06 20 3a 0d |set..". |...,. :.|
|000058b0| 1a 36 1d 20 dc 22 4c 4f | 4e 44 4f 4e 22 2c 30 2c |.6. ."LO|NDON",0,|
|000058c0| 30 2c 30 2c 35 32 2c 30 | 2c 30 2c 30 0d 1a 40 20 |0,0,52,0|,0,0..@ |
|000058d0| 20 dc 22 44 55 4c 57 49 | 43 48 22 2c 30 2c 2d 35 | ."DULWI|CH",0,-5|
|000058e0| 2c 30 2c 35 31 2c 32 37 | 2c 30 2c 30 0d 1a 4a 24 |,0,51,27|,0,0..J$|
|000058f0| 20 dc 22 57 48 49 54 45 | 48 41 56 45 4e 22 2c 2d | ."WHITE|HAVEN",-|
|00005900| 33 2c 33 35 2c 30 2c 35 | 34 2c 33 33 2c 30 2c 30 |3,35,0,5|4,33,0,0|
|00005910| 0d 1a 54 1f 20 dc 22 53 | 54 52 45 53 41 22 2c 38 |..T. ."S|TRESA",8|
|00005920| 2c 33 32 2c 30 2c 34 35 | 2c 35 33 2c 30 2c 31 0d |,32,0,45|,53,0,1.|
|00005930| 1a 5e 24 20 dc 22 47 49 | 55 4c 49 41 4e 4f 56 41 |.^$ ."GI|ULIANOVA|
|00005940| 22 2c 31 33 2c 35 38 2c | 30 2c 34 32 2c 34 35 2c |",13,58,|0,42,45,|
|00005950| 30 2c 31 0d 1a 68 1e 20 | dc 22 52 4f 4d 45 22 2c |0,1..h. |."ROME",|
|00005960| 31 32 2c 32 38 2c 30 2c | 34 31 2c 35 34 2c 30 2c |12,28,0,|41,54,0,|
|00005970| 31 0d 1a 72 27 20 dc 22 | 53 4b 59 26 54 45 4c 45 |1..r' ."|SKY&TELE|
|00005980| 53 43 4f 50 45 22 2c 2d | 37 35 2c 30 2c 30 2c 34 |SCOPE",-|75,0,0,4|
|00005990| 35 2c 30 2c 30 2c 2d 35 | 0d 1a 7c 24 20 dc 22 41 |5,0,0,-5|..|$ ."A|
|000059a0| 4e 43 48 4f 52 41 47 45 | 22 2c 31 35 30 2c 30 2c |NCHORAGE|",150,0,|
|000059b0| 30 2c 36 31 2c 31 30 2c | 30 2c 2d 38 0d 1a 86 23 |0,61,10,|0,-8...#|
|000059c0| 20 dc 22 53 59 44 4e 45 | 59 22 2c 31 35 31 2c 31 | ."SYDNE|Y",151,1|
|000059d0| 30 2c 30 2c 2d 33 35 2c | 35 35 2c 30 2c 31 30 0d |0,0,-35,|55,0,10.|
|000059e0| 1a 90 27 20 dc 22 4c 4f | 53 20 41 4e 47 45 4c 45 |..' ."LO|S ANGELE|
|000059f0| 53 22 2c 2d 31 31 38 2c | 31 35 2c 30 2c 33 34 2c |S",-118,|15,0,34,|
|00005a00| 30 2c 30 2c 2d 38 0d 1a | 9a 22 20 dc 22 51 55 45 |0,0,-8..|." ."QUE|
|00005a10| 42 45 43 22 2c 2d 37 31 | 2c 31 35 2c 30 2c 34 36 |BEC",-71|,15,0,46|
|00005a20| 2c 35 30 2c 30 2c 2d 34 | 0d 1a a4 26 20 dc 22 56 |,50,0,-4|...& ."V|
|00005a30| 41 4e 43 4f 55 56 45 52 | 22 2c 2d 31 32 33 2c 35 |ANCOUVER|",-123,5|
|00005a40| 30 2c 30 2c 34 39 2c 31 | 37 2c 30 2c 2d 38 0d 1a |0,0,49,1|7,0,-8..|
|00005a50| ae 21 20 dc 22 50 45 4b | 49 4e 47 22 2c 31 31 36 |.! ."PEK|ING",116|
|00005a60| 2c 32 34 2c 30 2c 33 39 | 2c 35 35 2c 30 2c 38 0d |,24,0,39|,55,0,8.|
|00005a70| 1a b8 22 20 dc 22 44 45 | 4e 56 45 52 22 2c 2d 31 |.." ."DE|NVER",-1|
|00005a80| 30 35 2c 30 2c 30 2c 33 | 39 2c 34 35 2c 30 2c 2d |05,0,0,3|9,45,0,-|
|00005a90| 37 0d 1a c2 28 20 dc 22 | 57 41 53 48 49 4e 47 54 |7...( ."|WASHINGT|
|00005aa0| 4f 4e 20 44 43 22 2c 2d | 37 37 2c 34 2c 30 2c 33 |ON DC",-|77,4,0,3|
|00005ab0| 38 2c 35 35 2c 30 2c 2d | 35 0d 1a cc 1e 20 dc 22 |8,55,0,-|5.... ."|
|00005ac0| 43 41 49 52 4f 22 2c 33 | 31 2c 31 35 2c 30 2c 33 |CAIRO",3|1,15,0,3|
|00005ad0| 30 2c 33 2c 30 2c 32 0d | 1a d6 21 20 dc 22 4d 49 |0,3,0,2.|..! ."MI|
|00005ae0| 41 4d 49 22 2c 2d 38 30 | 2c 31 32 2c 30 2c 32 35 |AMI",-80|,12,0,25|
|00005af0| 2c 34 36 2c 30 2c 2d 35 | 0d 1a e0 1e 20 dc 22 50 |,46,0,-5|.... ."P|
|00005b00| 41 52 49 53 22 2c 32 2c | 32 30 2c 30 2c 34 38 2c |ARIS",2,|20,0,48,|
|00005b10| 35 31 2c 30 2c 31 0d 1a | ea 23 20 dc 22 41 54 4c |51,0,1..|.# ."ATL|
|00005b20| 41 4e 54 41 22 2c 2d 38 | 34 2c 32 33 2c 30 2c 33 |ANTA",-8|4,23,0,3|
|00005b30| 33 2c 34 35 2c 30 2c 2d | 35 0d 1a f4 20 20 dc 22 |3,45,0,-|5...  ."|
|00005b40| 42 45 52 4c 49 4e 22 2c | 31 33 2c 32 35 2c 30 2c |BERLIN",|13,25,0,|
|00005b50| 35 32 2c 33 32 2c 30 2c | 31 0d 1a fe 1f 20 dc 22 |52,32,0,|1.... ."|
|00005b60| 41 54 48 45 4e 53 22 2c | 32 33 2c 34 34 2c 30 2c |ATHENS",|23,44,0,|
|00005b70| 33 38 2c 30 2c 30 2c 32 | 0d 1b 08 26 20 dc 22 48 |38,0,0,2|...& ."H|
|00005b80| 4f 4e 4f 4c 55 4c 55 22 | 2c 2d 31 35 37 2c 35 30 |ONOLULU"|,-157,50|
|00005b90| 2c 30 2c 32 31 2c 31 39 | 2c 30 2c 2d 31 30 0d 1b |,0,21,19|,0,-10..|
|00005ba0| 12 23 20 dc 22 43 48 49 | 43 41 47 4f 22 2c 2d 38 |.# ."CHI|CAGO",-8|
|00005bb0| 37 2c 34 35 2c 30 2c 34 | 31 2c 35 30 2c 30 2c 2d |7,45,0,4|1,50,0,-|
|00005bc0| 36 0d 1b 1c 24 20 dc 22 | 43 41 4c 43 55 54 54 41 |6...$ ."|CALCUTTA|
|00005bd0| 22 2c 38 38 2c 32 31 2c | 30 2c 32 32 2c 33 35 2c |",88,21,|0,22,35,|
|00005be0| 30 2c 35 2e 35 0d 1b 26 | 21 20 dc 22 44 45 4c 48 |0,5.5..&|! ."DELH|
|00005bf0| 49 22 2c 37 37 2c 31 34 | 2c 30 2c 32 38 2c 34 30 |I",77,14|,0,28,40|
|00005c00| 2c 30 2c 35 2e 35 0d 1b | 30 22 20 dc 22 54 45 48 |,0,5.5..|0" ."TEH|
|00005c10| 52 41 4e 22 2c 35 31 2c | 32 36 2c 30 2c 33 35 2c |RAN",51,|26,0,35,|
|00005c20| 34 30 2c 30 2c 33 2e 35 | 0d 1b 3a 21 20 dc 22 54 |40,0,3.5|..:! ."T|
|00005c30| 45 4c 20 41 56 49 56 22 | 2c 33 34 2c 34 36 2c 30 |EL AVIV"|,34,46,0|
|00005c40| 2c 33 32 2c 35 2c 30 2c | 32 0d 1b 44 23 20 dc 22 |,32,5,0,|2..D# ."|
|00005c50| 4a 45 52 55 53 41 4c 45 | 4d 22 2c 33 35 2c 31 35 |JERUSALE|M",35,15|
|00005c60| 2c 30 2c 33 31 2c 34 37 | 2c 30 2c 32 0d 1b 4e 1f |,0,31,47|,0,2..N.|
|00005c70| 20 dc 22 5a 55 52 49 43 | 48 22 2c 38 2c 33 34 2c | ."ZURIC|H",8,34,|
|00005c80| 30 2c 34 37 2c 32 31 2c | 30 2c 31 0d 1b 58 20 20 |0,47,21,|0,1..X  |
|00005c90| dc 22 54 4f 4b 59 4f 22 | 2c 31 33 38 2c 34 35 2c |."TOKYO"|,138,45,|
|00005ca0| 30 2c 33 35 2c 34 30 2c | 30 2c 39 0d 1b 62 25 20 |0,35,40,|0,9..b% |
|00005cb0| dc 22 4e 45 57 20 4f 52 | 4c 45 41 4e 53 22 2c 2d |."NEW OR|LEANS",-|
|00005cc0| 39 30 2c 31 2c 30 2c 33 | 30 2c 30 2c 30 2c 2d 36 |90,1,0,3|0,0,0,-6|
|00005cd0| 0d 1b 6c 22 20 dc 22 47 | 49 42 52 41 4c 54 45 52 |..l" ."G|IBRALTER|
|00005ce0| 22 2c 2d 35 2c 32 31 2c | 30 2c 33 36 2c 39 2c 30 |",-5,21,|0,36,9,0|
|00005cf0| 2c 31 0d 1b 76 21 20 dc | 22 42 4f 53 54 4f 4e 22 |,1..v! .|"BOSTON"|
|00005d00| 2c 2d 37 31 2c 35 2c 30 | 2c 34 32 2c 32 30 2c 30 |,-71,5,0|,42,20,0|
|00005d10| 2c 2d 35 0d 1b 80 27 20 | dc 22 4d 45 58 49 43 4f |,-5...' |."MEXICO|
|00005d20| 20 43 49 54 59 22 2c 2d | 39 39 2c 31 30 2c 30 2c | CITY",-|99,10,0,|
|00005d30| 31 39 2c 32 35 2c 30 2c | 2d 36 0d 1b 8a 22 20 dc |19,25,0,|-6..." .|
|00005d40| 22 44 45 54 52 4f 49 54 | 22 2c 2d 38 33 2c 35 2c |"DETROIT|",-83,5,|
|00005d50| 30 2c 34 32 2c 32 33 2c | 30 2c 2d 35 0d 1b 94 23 |0,42,23,|0,-5...#|
|00005d60| 20 dc 22 52 45 59 4b 4a | 41 56 49 4b 22 2c 2d 32 | ."REYKJ|AVIK",-2|
|00005d70| 31 2c 35 38 2c 30 2c 36 | 34 2c 39 2c 30 2c 30 0d |1,58,0,6|4,9,0,0.|
|00005d80| 1b 9e 26 20 dc 22 4b 41 | 4e 53 41 53 20 43 49 54 |..& ."KA|NSAS CIT|
|00005d90| 59 22 2c 2d 39 34 2c 33 | 33 2c 30 2c 33 39 2c 32 |Y",-94,3|3,0,39,2|
|00005da0| 2c 30 2c 2d 36 0d 1b a8 | 22 20 dc 22 41 4d 53 54 |,0,-6...|" ."AMST|
|00005db0| 45 52 44 41 4d 22 2c 34 | 2c 35 34 2c 30 2c 35 32 |ERDAM",4|,54,0,52|
|00005dc0| 2c 32 31 2c 30 2c 31 0d | 1b b2 26 20 dc 22 4c 41 |,21,0,1.|..& ."LA|
|00005dd0| 53 20 56 45 47 41 53 22 | 2c 2d 31 31 35 2c 31 30 |S VEGAS"|,-115,10|
|00005de0| 2c 30 2c 33 36 2c 31 30 | 2c 30 2c 2d 38 0d 1b bc |,0,36,10|,0,-8...|
|00005df0| 21 20 dc 22 42 52 55 53 | 53 45 4c 53 22 2c 34 2c |! ."BRUS|SELS",4,|
|00005e00| 32 31 2c 30 2c 35 30 2c | 35 30 2c 30 2c 31 0d 1b |21,0,50,|50,0,1..|
|00005e10| c6 23 20 dc 22 4e 45 57 | 20 59 4f 52 4b 22 2c 2d |.# ."NEW| YORK",-|
|00005e20| 37 34 2c 31 2c 30 2c 34 | 30 2c 34 33 2c 30 2c 2d |74,1,0,4|0,43,0,-|
|00005e30| 35 0d 1b d0 20 20 dc 22 | 48 45 4c 53 49 4e 4b 49 |5...  ."|HELSINKI|
|00005e40| 22 2c 32 35 2c 30 2c 30 | 2c 36 30 2c 38 2c 30 2c |",25,0,0|,60,8,0,|
|00005e50| 32 0d 1b da 23 20 dc 22 | 53 54 4f 43 4b 48 4f 4c |2...# ."|STOCKHOL|
|00005e60| 4d 22 2c 31 38 2c 39 35 | 2c 30 2c 35 39 2c 32 30 |M",18,95|,0,59,20|
|00005e70| 2c 30 2c 31 0d 1b e4 28 | 20 dc 22 50 48 49 4c 41 |,0,1...(| ."PHILA|
|00005e80| 44 45 4c 50 48 49 41 22 | 2c 2d 37 35 2c 31 30 2c |DELPHIA"|,-75,10,|
|00005e90| 30 2c 33 39 2c 35 37 2c | 30 2c 2d 35 0d 1b ee 21 |0,39,57,|0,-5...!|
|00005ea0| 20 dc 22 4d 41 4e 49 4c | 41 22 2c 31 32 30 2c 35 | ."MANIL|A",120,5|
|00005eb0| 39 2c 30 2c 31 34 2c 33 | 36 2c 30 2c 38 0d 1b f8 |9,0,14,3|6,0,8...|
|00005ec0| 26 20 dc 22 4a 4f 48 41 | 4e 4e 45 53 42 55 52 47 |& ."JOHA|NNESBURG|
|00005ed0| 22 2c 32 38 2c 32 2c 30 | 2c 2d 32 36 2c 31 30 2c |",28,2,0|,-26,10,|
|00005ee0| 30 2c 32 0d 1c 02 23 20 | dc 22 4c 45 4e 49 4e 47 |0,2...# |."LENING|
|00005ef0| 52 41 44 22 2c 33 30 2c | 32 35 2c 30 2c 35 39 2c |RAD",30,|25,0,59,|
|00005f00| 35 35 2c 30 2c 33 0d 1c | 0c 20 20 dc 22 4d 4f 53 |55,0,3..|.  ."MOS|
|00005f10| 43 4f 57 22 2c 33 37 2c | 33 37 2c 30 2c 35 35 2c |COW",37,|37,0,55,|
|00005f20| 34 35 2c 30 2c 33 0d 1c | 16 20 20 dc 22 4d 41 44 |45,0,3..|.  ."MAD|
|00005f30| 52 49 44 22 2c 2d 33 2c | 34 33 2c 30 2c 34 30 2c |RID",-3,|43,0,40,|
|00005f40| 32 35 2c 30 2c 31 0d 1c | 20 1e 20 dc 22 4f 53 4c |25,0,1..| . ."OSL|
|00005f50| 4f 22 2c 31 30 2c 34 35 | 2c 30 2c 35 39 2c 35 36 |O",10,45|,0,59,56|
|00005f60| 2c 30 2c 31 0d 1c 2a 22 | 20 dc 22 44 41 4c 4c 41 |,0,1..*"| ."DALLA|
|00005f70| 53 22 2c 2d 39 36 2c 34 | 38 2c 30 2c 33 32 2c 34 |S",-96,4|8,0,32,4|
|00005f80| 37 2c 30 2c 2d 36 0d 1c | 34 20 20 dc 22 56 49 45 |7,0,-6..|4  ."VIE|
|00005f90| 4e 4e 41 22 2c 31 36 2c | 32 32 2c 30 2c 34 38 2c |NNA",16,|22,0,48,|
|00005fa0| 31 33 2c 30 2c 31 0d 1c | 3e 23 20 dc 22 48 4f 55 |13,0,1..|># ."HOU|
|00005fb0| 53 54 4f 4e 22 2c 2d 39 | 35 2c 32 35 2c 30 2c 32 |STON",-9|5,25,0,2|
|00005fc0| 39 2c 34 35 2c 30 2c 2d | 36 0d 1c 48 1f 20 dc 22 |9,45,0,-|6..H. ."|
|00005fd0| 4b 52 41 4b 4f 57 22 2c | 31 39 2c 35 35 2c 30 2c |KRAKOW",|19,55,0,|
|00005fe0| 35 30 2c 33 2c 30 2c 31 | 0d 1c 52 1f 20 dc 22 4c |50,3,0,1|..R. ."L|
|00005ff0| 49 53 42 4f 4e 22 2c 2d | 39 2c 38 2c 30 2c 33 38 |ISBON",-|9,8,0,38|
|00006000| 2c 34 34 2c 30 2c 31 0d | 1c 5c 23 20 dc 22 43 41 |,44,0,1.|.\# ."CA|
|00006010| 52 41 43 41 53 22 2c 2d | 36 36 2c 35 36 2c 30 2c |RACAS",-|66,56,0,|
|00006020| 31 30 2c 33 35 2c 30 2c | 2d 34 0d 1c 66 23 20 dc |10,35,0,|-4..f# .|
|00006030| 22 4f 52 41 4e 47 45 22 | 2c 31 34 39 2c 31 30 2c |"ORANGE"|,149,10,|
|00006040| 30 2c 2d 33 33 2c 31 39 | 2c 30 2c 31 30 0d 1c 70 |0,-33,19|,0,10..p|
|00006050| 24 20 dc 22 43 4f 50 45 | 4e 48 41 47 45 4e 22 2c |$ ."COPE|NHAGEN",|
|00006060| 31 32 2c 33 34 2c 30 2c | 35 35 2c 34 33 2c 30 2c |12,34,0,|55,43,0,|
|00006070| 31 0d 1c 7a 1c 20 dc 22 | 42 4f 4e 4e 22 2c 37 2c |1..z. ."|BONN",7,|
|00006080| 36 2c 30 2c 35 30 2c 34 | 34 2c 30 2c 31 0d 1c 84 |6,0,50,4|4,0,1...|
|00006090| 22 20 dc 22 42 55 43 48 | 41 52 45 53 54 22 2c 32 |" ."BUCH|AREST",2|
|000060a0| 36 2c 37 2c 30 2c 34 34 | 2c 32 35 2c 30 2c 32 0d |6,7,0,44|,25,0,2.|
|000060b0| 1c 8e 29 20 dc 22 42 55 | 45 4e 4f 53 20 41 49 52 |..) ."BU|ENOS AIR|
|000060c0| 45 53 22 2c 2d 35 38 2c | 33 30 2c 30 2c 2d 33 34 |ES",-58,|30,0,-34|
|000060d0| 2c 34 30 2c 30 2c 2d 33 | 0d 1c 98 2b 20 dc 22 52 |,40,0,-3|...+ ."R|
|000060e0| 49 4f 20 44 45 20 4a 41 | 4e 45 49 52 4f 22 2c 2d |IO DE JA|NEIRO",-|
|000060f0| 34 33 2c 31 37 2c 30 2c | 2d 32 32 2c 35 33 2c 30 |43,17,0,|-22,53,0|
|00006100| 2c 2d 33 0d 1c a2 25 20 | dc 22 53 41 4e 54 49 41 |,-3...% |."SANTIA|
|00006110| 47 4f 22 2c 2d 37 30 2c | 34 30 2c 30 2c 2d 33 33 |GO",-70,|40,0,-33|
|00006120| 2c 33 30 2c 30 2c 2d 34 | 0d 1c ac 1f 20 dc 22 4c |,30,0,-4|.... ."L|
|00006130| 49 4d 41 22 2c 2d 37 37 | 2c 33 2c 30 2c 2d 31 32 |IMA",-77|,3,0,-12|
|00006140| 2c 36 2c 30 2c 2d 35 0d | 1c b6 21 20 dc 22 4e 41 |,6,0,-5.|..! ."NA|
|00006150| 49 52 4f 42 49 22 2c 33 | 36 2c 38 30 2c 30 2c 2d |IROBI",3|6,80,0,-|
|00006160| 31 2c 31 37 2c 30 2c 33 | 0d 1c c0 25 20 dc 22 41 |1,17,0,3|...% ."A|
|00006170| 55 43 4b 4c 41 4e 44 22 | 2c 31 37 34 2c 34 37 2c |UCKLAND"|,174,47,|
|00006180| 30 2c 2d 33 36 2c 35 35 | 2c 30 2c 31 32 0d 1c ca |0,-36,55|,0,12...|
|00006190| 23 20 dc 22 48 4f 4e 47 | 4b 4f 4e 47 22 2c 31 31 |# ."HONG|KONG",11|
|000061a0| 34 2c 31 35 2c 30 2c 32 | 32 2c 31 36 2c 30 2c 38 |4,15,0,2|2,16,0,8|
|000061b0| 0d 1c d4 22 20 dc 22 44 | 4a 41 4b 41 52 54 41 22 |..." ."D|JAKARTA"|
|000061c0| 2c 31 30 35 2c 34 35 2c | 30 2c 2d 36 2c 38 2c 30 |,105,45,|0,-6,8,0|
|000061d0| 2c 37 0d 1c de 22 20 dc | 22 42 41 4e 47 4b 4f 4b |,7..." .|"BANGKOK|
|000061e0| 22 2c 31 30 30 2c 33 30 | 2c 30 2c 31 33 2c 34 34 |",100,30|,0,13,44|
|000061f0| 2c 30 2c 37 0d 1c e8 24 | 20 dc 22 43 48 49 41 4e |,0,7...$| ."CHIAN|
|00006200| 47 20 4d 41 49 22 2c 39 | 38 2c 35 39 2c 30 2c 31 |G MAI",9|8,59,0,1|
|00006210| 38 2c 34 38 2c 30 2c 37 | 0d 1c f2 24 20 dc 22 53 |8,48,0,7|...$ ."S|
|00006220| 45 41 54 54 4c 45 22 2c | 2d 31 32 32 2c 32 31 2c |EATTLE",|-122,21,|
|00006230| 30 2c 34 37 2c 33 36 2c | 30 2c 2d 38 0d 1c fc 1f |0,47,36,|0,-8....|
|00006240| 20 dc 22 4b 48 41 4e 49 | 41 22 2c 32 34 2c 31 2c | ."KHANI|A",24,1,|
|00006250| 30 2c 33 35 2c 33 31 2c | 30 2c 32 0d 1d 06 1e 20 |0,35,31,|0,2.... |
|00006260| dc 22 44 41 56 41 4f 22 | 2c 31 32 35 2c 33 38 2c |."DAVAO"|,125,38,|
|00006270| 30 2c 37 2c 35 2c 30 2c | 38 0d 1d 10 21 20 dc 22 |0,7,5,0,|8...! ."|
|00006280| 54 41 4d 50 41 22 2c 2d | 38 32 2c 33 38 2c 30 2c |TAMPA",-|82,38,0,|
|00006290| 32 37 2c 35 38 2c 30 2c | 2d 35 0d 1d 1a 06 20 3a |27,58,0,|-5.... :|
|000062a0| 0d 1d 24 06 20 3a 0d 1d | 2e 06 20 3a 0d 1d 38 06 |..$. :..|.. :..8.|
|000062b0| 20 3a 0d 1d 42 06 20 3a | 0d 1d 4c 17 20 dc 22 2a | :..B. :|..L. ."*|
|000062c0| 22 2c 30 2c 30 2c 30 2c | 30 2c 30 2c 30 2c 30 0d |",0,0,0,|0,0,0,0.|
|000062d0| 1d 56 3d 20 f4 20 41 63 | 6b 6e 6f 77 6c 65 64 67 |.V= . Ac|knowledg|
|000062e0| 65 6d 65 6e 74 3a 20 41 | 53 54 52 4f 4e 4f 4d 59 |ement: A|STRONOMY|
|000062f0| 20 57 49 54 48 20 59 4f | 55 52 20 50 45 52 53 4f | WITH YO|UR PERSO|
|00006300| 4e 41 4c 20 43 4f 4d 50 | 55 54 45 52 0d 1d 60 2b |NAL COMP|UTER..`+|
|00006310| 20 f4 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | .      |        |
|00006320| 20 20 20 20 50 65 74 65 | 72 20 44 75 66 66 65 74 |    Pete|r Duffet|
|00006330| 74 2d 53 6d 69 74 68 0d | 1d 6a 38 20 f4 20 20 20 |t-Smith.|.j8 .   |
|00006340| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 43 |        |       C|
|00006350| 61 6d 62 72 69 64 67 65 | 20 55 6e 69 76 65 72 73 |ambridge| Univers|
|00006360| 69 74 79 20 50 72 65 73 | 73 20 20 31 39 38 35 0d |ity Pres|s  1985.|
|00006370| 1d 74 2d 20 f4 20 41 64 | 61 70 74 65 64 20 62 79 |.t- . Ad|apted by|
|00006380| 3a 20 20 20 20 20 20 44 | 41 41 46 20 44 75 6c 77 |:      D|AAF Dulw|
|00006390| 69 63 68 20 44 65 63 20 | 31 39 38 38 0d ff       |ich Dec |1988..  |
+--------+-------------------------+-------------------------+--------+--------+